Kalender in Userform taucht nicht auf
30.05.2007 12:01:00
Christian
ich habe ein Userform mit Multipages. Auf jede Seite habe ich ein Label mit der Hintergrundfarbe orange gelegt, damit das nicht so grau aussieht.
Nun mein Problem ich lass über einen Button einen Kalender : Calender Control 11.0 öffnen.
Private Sub B_5CalDeliveryDateTestTeam_Click()
Cal_5DeliveryDateTestTeam.Visible = True
Cal_5DeliveryDateTestTeam.SetFocus
End Sub
Wenn das Datum ausgewählt werden soll soll der Wert übernommenwerden und der Kalender wieder verschwinden:
Private Sub Cal_5DeliveryDateTestTeam_Click()
TB_5DeliveryDateTestTeam.Value = Cal_5DeliveryDateTestTeam.Value
Cal_5DeliveryDateTestTeam.Visible = False
End Sub
So nun zum eigentlichen Problem.
Wenn ich das erste mal den Button klicke sehe ich den Kalender nicht.
Verschiebe ich das komplette Fenster jetzt in einen Bereich wo der Kalender nicht mehr sichtbar wäre und wieder zurück, dann ist er da.
Ab dem 2ten mal wenn ich auf den Button klick ist der Kalender sofort da.
Habe ein paar Screenmshots gemacht.
https://www.herber.de/bbs/user/42873.xls
Kann mir das jemand erklären?
Danke & Gruß
Christian
Anzeige