Userform bei doppleclick öffnen

Forumthread: Userform bei doppleclick öffnen
4 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Userform bei doppleclick öffnen

18.03.2006 16:43:27

Giuseppe

Hallo Freunde,
es ist bestimmt sehr einfach, aber ich schaffe es nicht!!!!
Ich brauche eure Hilfe.
Mit diesem Code offnet sich ein Kalendar wenn ich in eine Zelle in Column 1 doppelklicke.


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
gu = 1
cc = 7
If ActiveCell.Column = (gu) Then
calendario.Show
End If
End Sub

Ich möchte aber, dass auch wenn in column 7 doppelklicke der Kalender aufgeht.
Ich habe probiert mit "und", ohne Erfolg
Kann jemand Helfen?
Danke
Giuseppe

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Userform bei doppleclick öffnen

18.03.2006 16:47:34

Reinhard
Mal ausprobiert ;-) ? o.w.T.

18.03.2006 16:54:55

Ramses
jetzt ja :-)

18.03.2006 17:10:27

Reinhard
AW: jetzt ja :-)

18.03.2006 17:14:59

Giuseppe

AW: Userform bei doppleclick öffnen

18.03.2006 16:47:34

Reinhard

Giuseppe,
vielleicht mit 2 Mäusen kannst2 in 2 Spalten gleichzeitig klicken*g
Das bedeutet das "und", also nimm "oder"
If ActiveCell.Column = (gu) or ActiveCell.Column = (cc) Then
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..

Mal ausprobiert ;-) ? o.w.T.

18.03.2006 16:54:55

Ramses

...

jetzt ja :-)

18.03.2006 17:10:27

Reinhard

Hallo,
aufgrund ägytischer Geheimdienstinformationen erstmals getestet*g


Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 1 Or Target.Column = 7 Then
MsgBox "huhu"
End If
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..

AW: jetzt ja :-)

18.03.2006 17:14:59

Giuseppe

Danke