Listenfeld füllen
13.04.2007 19:03:43
Jo
ich möchte das von dem unten aufgeführten Makro erstellte Listenfeld füllen. Mit welchen Befehlen kann ich z.B. den Text "example" in dieses Listenfeld einfügen?
Sub Makro1()
ActiveSheet.OLEObjects.Add(ClassType:="Forms.ListBox.1", Link:=False, _
DisplayAsIcon:=False, Left:=240, Top:=25.5, Width:=60.75, Height:=12).Select
End Sub
Schonmal vielen Dank im Voraus!
Jo