Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Userform öffnen mit Doppelklick

Forumthread: Userform öffnen mit Doppelklick

Userform öffnen mit Doppelklick
19.10.2004 11:23:26
Michael
Hallo alle zusammen
Ich habe 2 Probleme. Ich will es irgendwie schaffen, daß,
1.)wenn ich eine bestimmte Zelle anklicke (Doppelklick) die Userform1 aufgeht
2.)wenn die Userform geöffnet ist, dann soll diejenige Zelle (in der ich geklickt habe) auch das Ziel sein (d.h.:wenn ich mit dem Commandbutton1 in der Userform etwas ins Tabellenblatt eintragen will)
Ich hoffe es kennt sich irgendwer noch aus mit meinen Erklärungsversuchen.
Danke für Eure Hilfe
Michael
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform öffnen mit Doppelklick
19.10.2004 11:42:49
Michael
Das 1. Problem habe ich selber gelöst (glaube ich zumindest)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
With Target
UserForm1.Show
End With
End Sub

AW: Userform öffnen mit Doppelklick
Klaus
Hallo Michael,
in das Klassenmodul des Tabellenblatts folgenden Code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
With UserForm1
.TextBox1.ControlSource = Target.Address
.Show
End With
Cancel = True
End Sub

Benötigt wird in der UserForm1 ein Texteingabefeld, in diesem Falle "TextBox1" und ein CommandButton1 mit folgendem Code:

Private Sub CommandButton1_Click()
Unload Me
End Sub

Gruß Klaus
Anzeige
Danke Klaus
27.10.2004 11:37:08
Michael
DAnke Klaus für den Tipp
Tut mir leid, daß ich mich jetzt erst melde (Grippe)
Gruß
Michael
;
Anzeige

Infobox / Tutorial

Userform mit Doppelklick öffnen in Excel


Schritt-für-Schritt-Anleitung

Um eine Userform in Excel mit einem Doppelklick auf eine bestimmte Zelle zu öffnen, folge diesen Schritten. Diese Anleitung setzt voraus, dass du über Grundkenntnisse in VBA verfügst.

  1. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge den Code für den Doppelklick hinzu:

    • Wähle das entsprechende Arbeitsblatt aus, in dem du die Userform öffnen möchtest.
    • Füge den folgenden Code in das Klassenmodul des Arbeitsblatts ein:
    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
       With UserForm1
           .TextBox1.ControlSource = Target.Address
           .Show
       End With
       Cancel = True
    End Sub
  3. Gestalte die Userform:

    • Stelle sicher, dass deine Userform (UserForm1) ein Textfeld (TextBox1) und einen CommandButton (CommandButton1) enthält.
  4. Füge den Code für den CommandButton hinzu:

    • Klicke auf den CommandButton und füge den folgenden Code hinzu:
    Private Sub CommandButton1_Click()
       Unload Me
    End Sub
  5. Teste deine Userform:

    • Speichere deine Änderungen und gehe zurück zu Excel. Doppelklicke auf die Zelle, um die Userform zu testen.

Häufige Fehler und Lösungen

  • Fehler: Userform öffnet sich nicht:

    • Stelle sicher, dass der Code im richtigen Klassenmodul eingefügt wurde und die Userform korrekt benannt ist.
  • Fehler: TextBox zeigt nicht die richtige Adresse:

    • Überprüfe, ob der ControlSource der TextBox korrekt gesetzt ist und die Userform richtig geladen wird.

Alternative Methoden

Wenn du keine Userform verwenden möchtest, kannst du auch eine Eingabemaske direkt in Excel erstellen. Dazu kannst du die Funktion InputBox verwenden, um Daten zu sammeln. Hier ein einfaches Beispiel:

Sub Eingabe()
    Dim EingabeWert As String
    EingabeWert = InputBox("Bitte geben Sie einen Wert ein:")
    ActiveCell.Value = EingabeWert
End Sub

Praktische Beispiele

Hier ist ein Beispiel, wie du die Userform für eine einfache Dateneingabe nutzen kannst. Wenn ein Benutzer auf eine Zelle doppelklickt, wird die Userform angezeigt, und die Adresse der Zelle wird in das Textfeld geladen. Nachdem der Benutzer den Wert eingegeben hat und auf den Button klickt, wird der Wert in die Zelle geschrieben.


Tipps für Profis

  • Verwende Cancel = True: Dies verhindert, dass Excel in den Bearbeitungsmodus wechselt, wenn du auf die Zelle doppelklickst.
  • Erweitere deine Userform: Füge weitere Steuerelemente wie Dropdowns oder Checkboxen hinzu, um die Benutzerinteraktion zu verbessern.
  • Fehlerbehandlung implementieren: Denke daran, Fehlerbehandlungen einzufügen, um unerwartete Eingaben zu handhaben.

FAQ: Häufige Fragen

1. Wie kann ich die Userform anpassen? Du kannst die Userform im VBA-Editor öffnen und die Steuerelemente nach deinen Wünschen anpassen, z.B. Farben, Schriftarten und Layout.

2. Was mache ich, wenn der Code nicht funktioniert? Überprüfe die Benennung deiner Userform und stelle sicher, dass der Code im richtigen Klassenmodul eingefügt wurde. Teste den Code in einer neuen Arbeitsmappe, um sicherzustellen, dass es kein Komplikationen gibt.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige