Moin liebe gemeinde, Ich bin gerade am anfang eines VBA-Fernstudiums und hätte eine Frage bezüglich einer Aufgabe die ich bekommen habe.
7. Aufgabe:
Sorgen Sie dafür, dass beim Doppelklick in eine Zelle von Tabellenblatt1 Ihrer Excel-Datei eine Meldung mit dem folgenden Inhalt ausgegeben wird:
„Sie haben doppelt in Zelle: [Adresse der Zelle] geklickt.“
Dabei muss natürlich der Text in den eckigen Klammern durch die Adresse der Zelle ersetzt werden, in die jeweils doppelt geklickt wird, also z.B. $A$1.
Ich weiß soweit wie ich die MsgBox durch nur einen click hervorrufe, aber beim Doppelclick bin ich überfordert.
Soweit habe ich die Deklaration "BeforeDoubleClick" entdeckt, jedoch weiß ich nun nicht genau wie ich weiter handeln soll.
Der untere Quellcode ist die MsgBox mit einem click welcher auch funktioniert, der obere ist einer meiner versuche die Deklaration zu benutzen.
Edit: Ich habe natürlich das Modul Tabelle1 ausgewählt
Mfg.
7. Aufgabe:
Sorgen Sie dafür, dass beim Doppelklick in eine Zelle von Tabellenblatt1 Ihrer Excel-Datei eine Meldung mit dem folgenden Inhalt ausgegeben wird:
„Sie haben doppelt in Zelle: [Adresse der Zelle] geklickt.“
Dabei muss natürlich der Text in den eckigen Klammern durch die Adresse der Zelle ersetzt werden, in die jeweils doppelt geklickt wird, also z.B. $A$1.
Ich weiß soweit wie ich die MsgBox durch nur einen click hervorrufe, aber beim Doppelclick bin ich überfordert.
Soweit habe ich die Deklaration "BeforeDoubleClick" entdeckt, jedoch weiß ich nun nicht genau wie ich weiter handeln soll.
Quellcode
- 'Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
- 'If Target.Address Then MsgBox "Sie haben doppelt in Zelle: " & Target.Address & " geklickt"
- 'Cancel = True
- 'End Sub
- Private Sub Worksheet_SelectionChange(ByVal Target As Range)
- MsgBox "Sie haben doppelt in Zelle: " & Target.Address & " geklickt"
- End Sub
Der untere Quellcode ist die MsgBox mit einem click welcher auch funktioniert, der obere ist einer meiner versuche die Deklaration zu benutzen.
Edit: Ich habe natürlich das Modul Tabelle1 ausgewählt
Mfg.
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Krest“ ()