Thema Datum  Von Nutzer Rating
Antwort
Rot Kalender Pop-Up bei Doppelklick
 28.01.2022 12:00:41 Bastlwastl
Solved
28.01.2022 14:09:06 Gast27484
NotSolved
28.01.2022 14:18:06 Gast37512
NotSolved
28.01.2022 14:26:46 Gast40363
NotSolved

Ansicht des Beitrags:
Von:
Bastlwastl		 Datum:
28.01.2022 12:00:41		 Views:
836		 Rating:
     
Antwort:
 Nein
Thema:
Kalender Pop-Up bei Doppelklick

Hallo Zusammen,

ich habe schon sehr lange nicht mehr mit VBA/Makros gearbeitet, von daher sind meine Kenntnisse leider sehr lückenhaft.
Ich möchte in eine ToDo-Liste einen Kalender via Doppelklick in die entsprechende Zelle öffnen, ein Datum auswählen und das soll ich die Zelle übernommen werden.
Das funktioniert auch fast wunderbar, allerdings ist nach dem Doppelklick die Zelle aktiv und ich kann das Datum im geöffneten Kalender nicht auswählen da die aktive Zelle den Kalender sperrt.
Ich müsste dafür aus der Zelle rausgehen, die richtige Zelle wieder selektieren damit das Datum im Kalender auch auswählbar ist.

Kann mir hier jemand helfen wie ich den Fehler beheben kann, sodas der Doppelklick (im festgelegten Bereich) nur das Makro startet und nicht die Zelle aktiviert? Meine Strukturen schauen wie folgt aus:

UserForm:

Private Sub CommandButton1_Click()
ActiveCell.Value = ActiveCell.Value + 7
End Sub
Private Sub CommandButton2_Click()
ActiveCell.Value = ActiveCell.Value + 14
End Sub
Private Sub CommandButton3_Click()
ActiveCell.Value = ActiveCell.Value + 21
End Sub
Private Sub CommandButton4_Click()
ActiveCell.Value = ActiveCell.Value + 28
End Sub
Private Sub MonthView1_DateClick(ByVal DateClicked As Date)
ActiveCell.Value = MonthView1.Value
End Sub

Modul:

Sub UserForm1show()
If Intersect(Selection, Range("R3:R999")) Then UserForm1.Show False
End Sub

Worksheet:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 18 Then UserForm1show
cancle = True
End Sub


Vielen Dank vorab!!!

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Kalender Pop-Up bei Doppelklick
 28.01.2022 12:00:41 Bastlwastl
Solved
28.01.2022 14:09:06 Gast27484
NotSolved
28.01.2022 14:18:06 Gast37512
NotSolved
28.01.2022 14:26:46 Gast40363
NotSolved