Office: (Office 2007) Mit Click auf Zelle Userform öffnen

Moin,

ich möchte gerne mit einem Click z.B. auf A1 ein Userform öffnen.
Kann mir bitte jemand den Code den ich dazu brauche mitteilen.

:)

 

Hallo Ulli,

Code:

 

Danke für Deine schnelle Hilfe.

 

kann man den Code auch so abändern das das Ereignis (Userform öffnen) mit Click in jeder Zelle geöffnet wird in der z.B. Auto steht.

Auto steht zum Beispiel in A1, D2 und es können noch unbegrenzt Zellen mit dem Eintrag Auto dazu kommen.

 

Code funzt nicht. (warum SelectionChange und nicht Click ??)

 

hiho

es gibt viele Möglichkeiten,


Code:

usw..

 

Danke
für Deine Erklärung und Hilfe. Probier es gleich aus.

 

Hi zusammen,

ich würde mich ganz gern hier einklinken und dieses Thema wieder aufnehmen. Ich hocke gerade auf der Arbeit vor einem ähnlichen Problem. Es geht darum, dass ich in einer kompletten Spalte in Excel per Doppelklick ein Kalender-Popup öffnen möchte, das Datum in dem Kalender auswählen kann und dieses anschließend direkt in die ausgewählte Zelle zurückgeschrieben wird. Ich habe leider absolut keine Ahnung von VBA, aber mit ein bisschen Hilfe aus dem Netz habe ich mir bis dato folgenden Code zusammengebaut:

Private Sub Calendar1_DblClick()
ActiveCell.Value = Calendar1
Calendar1.Visible = False
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("AA2:AA5000")) Is Nothing Then
ActiveSheet.Calendar1.Visible = True
Else
ActiveSheet.Calendar1.Visible = False
End If
End Sub



Das Doppelklicken funktioniert soweit schon. Das Problem jetzt ist allerdings, dass ich den Kalender erst mit Doppelklick öffne, dann die Zelle auswählen muss in der er das Ergebnis zurückschreiben soll und anschließend erst das Ergebnis zurückschreibt. Dabei soll eigentlich das Datum in die vorher per Doppelklick ausgewählte Zelle zurückgeschrieben werden. Und nach Möglichkeit alles als Popup, damit man nicht immer wieder bis nach oben scrollen muss wenn man ganz unten ein Datum im unteren Bereich der Tabelle eingeben will.


Ich hoffe ich habe das jetzt genau genug beschrieben und Ihr könnt mir weiterhelfen.

Im Voraus schonmal vielen Dank.

mfG

 

Ich kram mal diesen alten Post heraus.

Ich habe der Zelle einen Namen definiert und will darauf zugreifen, aber keiner der Codes funktioniert:

Code:

Code:

Was mache ich denn falsch?

 

Moin!
Sowohl Target als auch Range("Nummer") sind Range-Objekte.
Der Default eines Range ist der .Value
Du vergleichst .Address mit .Value
(oder auch Äpfel mit Birnen)
*wink.gif*

Gruß Ralf

 

Danke für deine Antwort RPP63neu.

Aber wieso geht denn auch der folgende Code nicht:

Code:

?

 

Junge, Junge! *wink.gif*
.Address liefert die Zelladresse As String
Also z.B. "$Q$123"
Vergleiche also Äpfel mit Äpfeln:
Code:

Gruß Ralf

 

Oder nimm das eher benutzte:
Code:

 

Perfekt!
Vielen Dank für deine Hilfe RPP63neu.