Print side | Luk vindue

nyt comboboks problem

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=341
Udskrevet den: 04.Dec.2024 kl. 09:37


Emne: nyt comboboks problem
Besked fra: Lonny
Emne: nyt comboboks problem
Posteringsdato: 08.Maj.2011 kl. 07:39
Hej
Jeg laver en combobox med følgende kode
 
Public Sub sæt_combo(ark, lf, tp, wh, hg, navn, dat)
    Worksheets(ark).OLEObjects.Add(ClassType:="Forms.ComboBox.1", Link:=False, _
        DisplayAsIcon:=False, Left:=lf, Top:=tp, Width:=wh, Height:= _
        hg).Select
    With Selection
        .Name = navn
        .ListFillRange = dat   
    End With
End Sub
 
Hvordan laver jeg en change event i module1 til f.eks en combo kaldt med navn="testcombo" i ark="SRA0014"?
 
 
Det er ikke muligt at indsætte change eventen i koden på selve arket, da det pågældende ark generes af programmet lige inden
 
PÅ forhånd tak fra Lonny
 


Print side | Luk vindue