bei formload soll eine comboBox gefüllt werden:
Dim DatumJahr As Variant
DatumJahr = Year(Date)
frmTextKdg.cbJahr.Text = DatumJahr
frmTextKdg.cbJahr.AddItem = DatumJahr + 1
frmTextKdg.cbJahr.AddItem = DatumJahr + 2
Er mag die AddItem Zeilen nicht. warum?
Grüße aus HH mit SonneWolkenMix und 18 Grad
ray