Combobox mit festen Daten füllen

Computer: Software & Programmierung Visual Basic
#1

Hallo zusammen!

Ich möchte eine Combobox mit Daten füllen. Aber nicht mit welchen, die irgendwo in Zellen stehen, sondern mit festen Werten, die sich nicht verändern werden.

Ich habe es so probiert:

Private Sub Einspeisung_Initialize()

Einspeisung.AddItem („Text“)
Einspeisung.AddItem („Text2“)

End Sub

Das klappt aber nicht ganz. Immer wenn ich die Datei neu öffne, dann ist die ComboBox wieder leer. Ich muss dann erst wieder das Sub
aufrufen, dann ist die ComboBox wieder gefüllt.

Kann mir da jemand weiterhelfen? Ich möchte eigentlich, dass die ComboBox immer gefüllt ist mit den gleichen Daten und die auch nach dem schließen und öffnen noch in der ComboBox enthalten sind.

Dennis

#2

Private Sub Einspeisung_Initialize()
Einspeisung.AddItem („Text“)
Einspeisung.AddItem („Text2“)
End Sub

Das klappt aber nicht ganz. Immer wenn ich die Datei neu
öffne, dann ist die ComboBox wieder leer. Ich muss dann erst
wieder das Sub
aufrufen, dann ist die ComboBox wieder gefüllt.

Hallo Dennis,

was erwartest du von dem Code? Die UF hat ein Initialize-Ereignis beim Start von ihr. Die ComboBox nicht, also ist das normaler Standardcode der in ein Standardmodul gehört.

Bau dir in das Workbook_Open-Ereignis im Modul Diese Arbeitsmappe ein:
Call Einspeisung_Initialize

Möglicherweise macht dann das „private“ noch Probleme, lösche es.

Gruß
Reinhard

#3

Vielen Dank!!! Jetzt klappt es!!!

Gruß

Dennis