ActiveX Combobox

[snb]

Bitte, verwende Code Tags

Dieser Code reicht und ist schneller

PHP-Code:

Private Sub Workbook_Open()
  With Tabelle1
      .ComboBox6.List= .Range("CC98:CC145").Value
      .ComboBox5.List =.Range("CC49:CC96").Value
  End With
End Sub 


[stchwint]

Das funktioniert zwar an sich auch, aber da erscheint wieder die Fehlermeldung "Laufzeitfehler 70 Zugriff verweigert".

[snb]

Lösche 'Rowsource'.

[stchwint]

Was meinst du genau? CC löschen?

[Case]

Hallo, :19:

bei einer ActiveX-ComboBox heißt es nicht "Rowsource" sondern "ListFillRange". :21:

Da hast du in den Einstellungen der ComboBox etwas reingeschrieben. Dann kann per VBA nicht mehr gesetzt werden (AddItem oder List).

Schau es dir hier mal an: :17:

Steuerelemente...

[stchwint]

Achso :d ja habe ich gemacht klappt aber trotzdem nicht. Habe jetzt Listfillrange manuell eingegeben und den Format der Quelldaten auf Text geändert. Brauche den Code nicht .

Dank euch