Combobox aus Excel Beispiel 161901

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Combobox aus Excel Beispiel 161901
von: Thomas Prangenberg
Geschrieben am: 15.10.2003 12:14:35

Hallo zusammen,

Ich habe da ein kleines Problem, mit dem VBA Program von Hans Nr. 161901
wenn ich die Werte in der Spalte A mit ein benutzerdefiniertes Format
belege z.B.: TT.MM.JJJJ (stehen halt nur Datumswerte drin) bekomme Ich ein
Laufzeitfehler 380 Eigenschaft Listindex kann nicht gesetzt werden, ungültiger
Eigenschaftswert.

Wer weis Rat ?

Gruß Thomas

Bild


Betrifft: AW: Combobox aus Excel Beispiel 161901
von: Michael Scheffler
Geschrieben am: 15.10.2003 12:46:32

Hi,

poste doch bitte etwas Code, dann weiß(!) ich vielleicht Rat.

Gruß

Micha


Bild


Betrifft: AW: Combobox aus Excel Beispiel 161901
von: Thomas
Geschrieben am: 15.10.2003 13:15:16

Hallo Michael

hier der Code:


Private Sub UserForm_Initialize()
Dim col As New Collection
Dim iRow As Integer
iRow = 2
On Error Resume Next
Do Until IsEmpty(Cells(iRow, 1))
col.Add Cells(iRow, 1), Cells(iRow, 1)
If Err = 0 Then
cboDatum.AddItem Cells(iRow, 1)
Else
Err.Clear
End If
iRow = iRow + 1
Loop
On Error GoTo 0
cboDatum.ListIndex = 0
End Sub



Bild


Betrifft: AW: Combobox aus Excel Beispiel 161901
von: Michael Scheffler
Geschrieben am: 15.10.2003 14:16:58

Hi,

und wo hält er nun an?

Gruß

Micha


Bild


Betrifft: AW: Combobox aus Excel Beispiel 161901
von: Thomas
Geschrieben am: 15.10.2003 14:23:54

Hallo Micha,

Bei cbo.Datum.listindex = 0 kommt der oben genannte Fehler

Zur Info Saplte A hat ca 15000 Datumswerte.

Gruß Thomas


Bild


Betrifft: AW: Combobox aus Excel Beispiel 161901
von: Michael Scheffler
Geschrieben am: 15.10.2003 16:36:01

Hi,

und Deine Form enthält eine Combobox namens cbo?


Bild


Betrifft: AW: Combobox aus Excel Beispiel 161901
von: Thomas
Geschrieben am: 17.10.2003 07:50:52

Hi,

Die ComboBox hat den Namen cboDatum und ist auf ein Excel Tabellenblatt
aufgesetzt. Du kannst es ja mit dem oben gennanten Programm mal ausbrobieren.


 Bild

Beiträge aus den Excel-Beispielen zum Thema " Combobox aus Excel Beispiel 161901"