Microsoft Excel

Herbers Excel/VBA-Archiv

Datum ohne Doppelte in ComboBox einlesen

Betrifft: Datum ohne Doppelte in ComboBox einlesen von: edie
Geschrieben am: 08.06.2008 20:12:19

Hallo zusammen,

habe im Archiv nachfolgende Code gefunden im dem
aus Spalte A ohne Doppelte Einträge eingelesen werden.

Private Sub UserForm_Initialize()

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



Leider wird eine Datumsreihe im Format: TT.MM.JJ nicht eingelesen.

Kann mir jemand helfen?

Vielen Dank im Voraus.

Grüße

  

Betrifft: AW: Datum ohne Doppelte in ComboBox einlesen von: Hajo_Zi
Geschrieben am: 08.06.2008 20:30:32

Hallo Edie,

Cells(iRow, 1).Text

GrußformelHomepage


  

Betrifft: AW: Funktioniert, vielen Dank von: edie
Geschrieben am: 08.06.2008 21:07:47

Hallo Hajo,

Vielen Dank, funktioniert 100%.

Deutschland-Polen 1:0

Grüße


 

Beiträge aus den Excel-Beispielen zum Thema "Datum ohne Doppelte in ComboBox einlesen"