Userform über Zelle aufrufen

Forumthread: Userform über Zelle aufrufen
2 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Userform über Zelle aufrufen

06.02.2005 17:52:49

Helge

Hallo,
geht so etwas?
In A5 steht Name1, in A6 Name2 usw. bis A25.
Nun soll bei Doppelklick in einer dieser Zellen die
jeweilige Userform geöffnet werden.
Beispiel:
Doppelklick in A6 --> UserformName2
Danke
Gruß Helge

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Userform über Zelle aufrufen

06.02.2005 18:02:56

Nepumuk
AW: Userform über Zelle aufrufen

06.02.2005 19:23:28

Helge

AW: Userform über Zelle aufrufen

06.02.2005 18:02:56

Nepumuk

Hallo Helge,
klar geht das. Rechtsklick auf den Tabellenreiter - Code anzeigen. Folgendes Makro reinkopieren:

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("A6:A10")) Is Nothing And Target.Count = 1 Then
        UserForms.Add(Trim$(Target.Text)).Show
        Cancel = True
    End If
End Sub