Forums Neueste Beiträge
 

Steuerelemnt einfügen

24/11/2008 - 20:20 von Kricklruder | Report spam
Hallo

Ich möchte mittels VBA eine ComboBox in eine neues Tabellenblatt einfügen
und anschliessend Eigenschaften àndern. Z.B.: ListFillRange,
ShowDropDownButton
auf fmShowDropDownButtonWhenNever, Style auf fmStyleDropDownList usw.

Was ich auch versuche, nichts gelingt programmgesteuert. Bitte, kann mir
jemand helfen. Danke, danke.

Ingo
 

Lesen sie die antworten

#1 Michael v. Fondern
24/11/2008 - 21:29 | Warnen spam
Hallo Ingo,

Ich möchte mittels VBA eine ComboBox in eine neues Tabellenblatt einfügen
und anschliessend Eigenschaften àndern. Z.B.: ListFillRange,
ShowDropDownButton



Z.B. so:

Dim cb As OLEObject
Set cb = ActiveSheet.OLEObjects.Add( _
ClassType:="Forms.ComboBox.1", Link:=False, _
DisplayAsIcon:=False, Left:&5.5, _
Top:1.5, Width:1.75, Height:= _
42)
cb.Object.ShowDropButtonWhen = 1


Allerdings: ListFillRange gibt's bei Combo-Boxen nicht. Der
Makrorecorder hilft für obiges Problem in der Tat nur bedingt weiter,
allerdings kannst du obigen Code im Einzelschrittmodus im Debugger
ausführen und dir z.B. cb.Object im Überwachungsfenster genau ansehen.
Damit bekommst du heraus, was geht und was nicht geht.

Grüße

- Michael -

Ähnliche fragen