Clever-Excel-Forum

Moin allerseits, gutes Neues, usw..
Heute brauch ich mal Hilfe.
Ich habe mir vor einiger Zeit den angefügten "Kalender" hier herauskopiert, um damit das Active-X in unserem Urlaubsplaner zu ersetzen. Habe ich auch getan und wo nötig angepasst. Als ich dann gestern den neuen Urlaubsplaner vorgestellt habe, hat gleich ein Kollege eine Fehlfunktion festgestellt. Und zwar -
Vor und hinter den Tagen des aktuellen Monats sind (etwas heller) die letzten Tage des Vormonats und die ersten Tage des Folgemonats in der UF angezeigt. Wenn ich aber auf diese Tage clicke, liefert er mir ein ganz anderes Datum.
Da der Code nicht von mir selber stammt und ich ihn offen gestanden nicht ganz durchschaue, wollte ich fragen ob hier im Forum sich jemand in der Lage fühlt den Code zu korrigieren.
Vielen Dank im Voraus.

Igel

Hallo, :19:

ändere den Code im Klassenmodul (clsLabel) so ab: :21:

Code:
Private Sub Lbl_Click()

    If Lbl.ForeColor <> -2147483632 Then

        Call SelectDate(Lbl.Tag)

        UserForm1.ActiveControl.Text = Lbl.Tag

    End If

    '   Unload ufCalendar

End Sub

Dann passiert nichts, wenn auf ein "graues" Datum geklickt wird.

Hallo,
mir wurde kein Calendar angezeigt. Muss ich Einstellungen ändern?

Lg
Marcus

(03.01.2019, 09:43)marose67 schrieb: [ -> ]Hallo,
mir wurde kein Calendar angezeigt. Muss ich Einstellungen ändern?

Lg
Marcus

Hallo, :19:

UserForm über Button starten, dann Doppelklick in Textfeld. :21:

Hallo

,
das muss man natürlich einem doofen erst mal mitteilen :100:

Jetzt wird es mir auch klar. Dake Dir
Marcus

Vielen Dank Case.
Ist auf jeden Fall schon mal ein erster Schritt, um Fehleinträge zu verhindern.
Setz ich gleich mal um.
Igel

Moin,
Keine weiteren Ideen ?
:22: Igel :22:

Hallöchen,

was schwebt Dir den vor an anderen Ideen? Normalerweise ist es so, dass das Dimmen oder Ausgrauen für einen nicht zur Verfügung stehenden Inhalt steht.
Ich hab da auch ein Muster, wo es mit dem Folgemonat funktioniert.
http://www.xltips.de/ftxt/lnk-dow/DatePicker.htm

Hallo Andreas,
Ich hatte mir diesen Calendar hier im Forum mal rausgezogen, weil ich den ActiveX in unserem Urlaubsplaner durch etwas ersetzen wollte, was auf allen Rechnern funktioniert, ohne das erst etwas installiert werden muss.
Nur funktioniert dieser nicht ganz richtig. Ist halt blöd, wenn jemand vom 31. bis zum 1. Urlaub eintragen will.
Ich dachte, wenn sich hier jemand gut genug auskennt, kann er vielleicht dieses Fehlverhalten korrigieren.
Ist aber nicht lebenswichtig. Jetzt sind die Tage, die den falschen Wert zurückgeben erst mal ausser Funktion gesetzt.
Trotzdem Danke
Igel

So schnell geb ich nicht auf.
Hab gestern Abend etwas Zeit zum tüfteln gehabt.
@ Case - Danke nochmal ,dein Tipp hat zumindest bis heute Fehleinträge verhindert.
@ Fegerin - Du hattest das Ding mal hier reingestellt. Jetzt funktioniert es richtig.
Im Anhang jetzt eine funktionierende (leicht modifizierte) Variante, mit der man Datepicker o.ä. ersetzen kann.
Gruss Igel

Igelbauer

Case

marose67

Case

marose67

Igelbauer

Igelbauer

schauan

Igelbauer

Igelbauer