hej
Jeg skal via auto_open af et excel-ark lave en comboboks med indhold på et ark (pt. arket "Forside") som jeg efterfølgende skal referere til
Jeg har følgende kode
Worksheets("Forside").OLEObjects.Add(ClassType:="Forms.ComboBox.1", Link:=False, _
DisplayAsIcon:=False, Left:=70#, Top:=60#, Width:=130, Height:=20).Select
With Selection
.Name = "liste"
End With
som funker fint - jeg får en comboboks med navn men uden indhold
Jeg har også følgende kode
With Worksheets("Forside").OLEObjects.Add(ClassType:="Forms.ComboBox.1", Link:=False, _
DisplayAsIcon:=False, Left:=70#, Top:=60#, Width:=130, Height:=20)
With .Object
.AddItem "Telefonliste"
.AddItem "Mailliste"
.AddItem "Fødselsdagsliste"
End With
End With
som også funker fint - jeg får en comboboks med indhold men uden navn som jeg efterfølgende kan refere til
Nu til problemet - jeg skal have en kombination af de to sæt af koder - dvs oprettet comboboks med indhold og samtidigt skal denne comboboks være navngivet, så jeg efterfølgende kan refere til denne
Måske er jeg dum og løsningen er simpel, men pt er jeg kørt fast - så enhver form for hjælp påskønnes
På forhånd tak for hjælp fra Lonny