29. januar 2012 - 12:53Der er
5 kommentarer og 1 løsning
en simpel if then statement
jeg er nybegynder i vba, jeg har oprettet en userform i excel 2010 med to combobokse, man vælger en liste i den første combo, som afhængig af valget skal fylde den anden ´combo boks
fejlen ligger et andet sted - når du starter formen er der ikke valgt noget i cboAnlag og derfor kan du ikke udfylde Cbotype. Du skal have en rutine cboAnlag.onchange (eller noget i den stil), og der køre If cboAnlag.Value = "1" Then Me.Cbotype.AddItem "a"
If cboAnlag.Value = "2" Then Me.Cbotype.AddItem "b" som du bør omskrive til Me.Cbotype.Clear Select case cboAnlag.Value case ="1" Me.Cbotype.AddItem "a" case ="2" Me.Cbotype.AddItem "b" end select
du skal først rydde den for indhold - ellers bliver den jo længere og længere - og derefter fylde 'nyt' indhold i.
i excel hedder det så OnAction (onChange er javascript) - og det, du har i #4 er noget rod - drop det helt.
Private Sub cboAnlag_OnAction(en eller anden parameter her) Me.Cbotype.Clear Select case cboAnlag.Value case is = "1" Me.Cbotype.AddItem "a" case is = "2" Me.Cbotype.AddItem "b" end select end sub
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.
