Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

nochmal Kalender aber Fehler

Forumthread: nochmal Kalender aber Fehler

nochmal Kalender aber Fehler
01.08.2024 17:49:54
kurt k
Guten Abend,
ich hatte ja vorhin schon versucht das Kalenderproblem zu lösen, leider ohne Erfolg.

Jetzt habe ich mit einen Kalender aus einer anderen gesuchten Anwendung kopiert.
Der Kalender wird aktiviert, wenn der Cursor in folgenden Zellen steht:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Application.Intersect(Target, Range("b3:b22, g3:g22, b26:b45, bg26:g45")) Is Nothing Then
UserForm4.Show
End If
End Sub

soweit funktioniert es.
Jetzt möchte ich nur das in der aktiven Zelle das ausgewählte Datum mit Doppelklick reinkopiert wird, das klappt
allerdings nicht. Dann kommt eine Fehlermeldung.
Ich bin leider nicht der große Experte und hoffe das mir jemand das Makro korrigieren kann.

https://www.herber.de/bbs/user/171394.xlsm
gr kurt k

Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: nochmal Kalender aber Fehler
01.08.2024 20:08:55
schauan
Hallöchen,

entweder hast Du in Deinem VBA zuviel drin oder es fehlt z.B. der Dialog Frm_DatePicker
Guten Abend schauan
01.08.2024 20:22:57
kurt k
Guten Abend schauan,
versteh nicht ganz, ich habe doch die Userform2, das ist doch der Kalender.
Es kommt eine Fehlermeldung:
Fehler beim Kompilieren
Sub oder Function nicht definiert


Bleibt hier stehen:
Private Sub Label_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)


gr kurt k
Anzeige
AW: Guten Abend schauan
01.08.2024 20:44:57
schauan
Hallöchen,

Problem ist ... Kalender(j).Container
Wo hast Du den Code denn her?
AW: Guten Abend schauan
01.08.2024 21:01:11
Kurt k
Hallo,
habe gegoogelt und gefunden.
Wenn ich die entsprechenden Zellen anspreche wird der Kalender geladen, leider aber
wird bei Doppelklick die Fehlermeldung ausgegeben.

Gr Kurt k
AW: Guten Abend schauan
01.08.2024 21:22:18
volti
Hallo Kurt,

kann mich schauan nur anschließen.

kalender ist nicht deklariert, deshalb kommt der Fehler. Und wo hast Du den Code her.

Zur Info:
https://www.herber.de/forum/messages/1986884.html

Gruß
Karl-Heinz
Anzeige
AW: Guten Abend schauan
01.08.2024 21:57:19
Alwin Weisangler
Hallo Miteinander,

das ist schon lustig, was so mit den Sachen passiert, die man mal hochgeladen hat.
Da hat sich einer am Umbau damit versucht. Manche Sachen sind 1 zu 1 drin und anderes wurde übersehen oder der Zusammenhang nicht erkannt.
Hier mal das was, ich seinerzeit zusammengestellt und hochgeladen hatte (weiß der Geier wo/wann - ich merke mir nicht alles) eingebaut in seine Datei.
https://www.herber.de/bbs/user/171399.xlsm

Gruß Uwe

Anzeige
Danke Uwe, SUPER -)
01.08.2024 22:46:09
kurt k
Guten Abend zusammen,
die Datei funktioniert, danke !
gr kurt k
Hallo Uwe, leider ein kleiner Fehler...
02.08.2024 12:22:16
kurt k
Guten Morgen Uwe,
wenn ich im Zellbereich J26 bis ... bin wird ebenfalls der Kalender angezeigt.
Wo muss ich was ändern ?

mfg kurt k
AW: Hallo Uwe, leider ein kleiner Fehler...
02.08.2024 12:53:11
Alwin Weisangler
ja es ist dein Tippfehler im Range:
If Not Application.Intersect ....

Auch wenn es so funktioniert sollte man Zellbuchstaben Groß schreiben. Da fallen die Fehler besser auf.
Den Fehler solltest du selbst beheben können.

Gruß Uwe
Anzeige
Danke Uwe für die Info, hat geklappt ! -)
02.08.2024 13:34:02
kurt k

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige