Combobox aus Excel Beispiel 161901

• Combobox aus Excel Beispiel 161901 von Thomas Prangenberg vom 15.10.2003 12:14:35
  • AW: Combobox aus Excel Beispiel 161901 - von Michael Scheffler am 15.10.2003 12:46:32
    • AW: Combobox aus Excel Beispiel 161901 - von Thomas am 15.10.2003 13:15:16
      • AW: Combobox aus Excel Beispiel 161901 - von Michael Scheffler am 15.10.2003 14:16:58
        • AW: Combobox aus Excel Beispiel 161901 - von Thomas am 15.10.2003 14:23:54
          • AW: Combobox aus Excel Beispiel 161901 - von Michael Scheffler am 15.10.2003 16:36:01
            • AW: Combobox aus Excel Beispiel 161901 - von Thomas am 17.10.2003 07:50:52

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

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




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

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




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




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?




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.

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