Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketVærdi i dropdown ud fra en liste

 Besvar Besvar Side  <12
Forfatter
Ib Hansen Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 15.Apr.2014
Land: Danmark
Status: Offline
Point: 652
Direkte link til dette indlæg Sendt: 27.Dec.2014 kl. 18:56
Hej Excelent.

Tak - Det ser rigtigt intersant ud.
Lige nu sidder jeg med nogle dumme MsgBoxe, jeg ikke kan få til at åbne på de rigtige kommandoer, men jeg vil prøve din kode lidt senere, når jeg får løst MsgBox problemet.

Mvh.
Ib
Til top



Til top
excelent Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 12.Apr.2011
Land: DK
Status: Offline
Point: 2171
Direkte link til dette indlæg Sendt: 27.Dec.2014 kl. 18:31
prøv med følgende :
 
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("C4:C17")) Is Nothing Then Exit Sub
Dim t, List
  For t = 4 To 17
    If Cells(t, "C") <> "" Then List = List & "," & Cells(t, "C")
  Next
  With Range("F4:F8,F10:F14,F16:F20,F22:F26").Validation ' tilføj selv flere ranges
    .Delete
    .Add xlValidateList, Formula1:=List
    .InCellDropdown = True
  End With
End Sub
 
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!
Til top
Ib Hansen Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 15.Apr.2014
Land: Danmark
Status: Offline
Point: 652
Direkte link til dette indlæg Sendt: 23.Dec.2014 kl. 11:40
Hej Forum

- Jeg bruger Data - Datavalidering - Liste til at vælge en værdi fra et kildeområde.
- Værdien fra kildeområdet indsættes i alle de celler, der er defineret som dropdown listen.
- Cellerne, hvor værdierne skal indsættes, er fordelt over dagene, hen over 14 mdr.
- Hver måned er separeret i hvert sit Range.

Er det muligt at lave koden i VBA hvor:
- Kildeområdet defineres og skal vises i dropdown.
- Dropdown defineres i hvert sit Range i hver måned.
- Tomme celler fra kildeområdet udelades, så dataene vises i en ubrudt liste i dropdown.
- Hvis der skrives en anden værdi i dropdown, end den der er defineret i kilden = MsgBox "Ugyldig".

Hvis koden kan laves, så den placeres i den arkfane den skal virke på, kan man undlade at skulle indsætte den i hver eneste celle hen over de 14 mdr.
Dette ville selvfølgelig være at foretrække.

Se vedhæftede eksempel med forklaring.
uploads/1125/VBA_Dropdown_-_Værdi_ud_fra_liste.xlsm

På forhånd tak.
Glædelig Jul og Godt Nytår.

Ib


Til top
 Besvar Besvar Side  <12

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk