Avatar billede WannabeNerd Nybegynder
14. januar 2013 - 20:16 Der er 1 kommentar og
1 løsning

Liste (datavalidering) i Excel. Opdatér automatisk, hvis kildeværdier ændres

Jeg har brug for 200 rækker med dropdownbokse, så den, der anvender regnearket via drop Down boksene kan vælge diverse værdier på hver række.

Jeg har brugt Datavalidering - Liste, og det fungerer perfekt BORTSET FRA et enkelt problem.

Problemet er, at værdierne i cellerne indeholdende drop down menuerne ikke automatisk opdateres, hvis kildedata ændres.

Et eksempel på, hvordan det skal fungere:

A1: Cykel
A2: Bil
A3: Båd

B1: Drop Down (kilde=$A$1:$A$3) - brugeren har valgt Cykel
B2: Drop Down (kilde=$A$1:$A$3) - brugeren har valgt Båd
B3: Drop Down (kilde=$A$1:$A$3) - brugeren har valgt Båd

Nu opdaterer brugeren værdien i A3 til: Sejlbåd

Det jeg gerne vil have Excel til automatisk at gøre er at opdatere B2's og B3's værdier til Sejlbåd

Er det muligt uden alt for meget programmering?


:-)
Avatar billede WannabeNerd Nybegynder
14. januar 2013 - 20:59 #1
Har fundet en løsning:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim strValidationList As String
Dim strVal As String
Dim lngNum As Long

On Error GoTo Nevermind
strValidationList = Mid(Target.Validation.Formula1, 2)
strVal = Target.Value
lngNum = Application.WorksheetFunction.Match(strVal, Range(strValidationList), 0)

If strVal <> "" And lngNum > 0 Then
    Application.EnableEvents = False
    Target.Formula = "=INDEX(" & strValidationList & ", " & lngNum & ")"
End If

Nevermind:
    Application.EnableEvents = True
   
End Sub
Avatar billede WannabeNerd Nybegynder
14. januar 2013 - 21:00 #2
Løsning fundet...
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester