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

Mehrere Abfragen in einer Inputbox

Forumthread: Mehrere Abfragen in einer Inputbox

Mehrere Abfragen in einer Inputbox
03.12.2005 20:01:30
Florian
Hallo,
ich möchte gerne über eine Inputbox mehrere Werte gleichzeitig eingeben lassen.
Also das Fenster soll aufgehen, enthalten sind dann drei Textfelder und ein OK Button.
Bisher hab ich es nur geschafft eine Inputbox mit einem Eingabefeld hinbekommen.
Kann mir jemand helfen?
Gruß florian
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mehrere Abfragen in einer Inputbox
03.12.2005 20:04:52
Reinhard
Hi Florian,
das geht m.W. nicht.
Du brachst eine Userform. Suche mal in der Recherche nach UF-Beispielen.
Gruß
Reinhard
AW: Mehrere Abfragen in einer Inputbox
ransi
hallo florian
2 möglichkeiten:
Entweder du baust ein neues Steuerelement welches 3 INputboxen und den OK-Button hat.
(Habe ich auch mal versucht bin aber kläglich gescheitert.)
oder
du erstellst eine Userform mit 3 textboxen und einem OK button.
ransi
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Mehrere Abfragen in einer Inputbox


Schritt-für-Schritt-Anleitung

Um eine VBA Inputbox mit mehreren Eingabefeldern zu erstellen, musst du eine Userform verwenden, da die standardmäßige Inputbox nur ein einzelnes Eingabefeld unterstützt. Hier sind die Schritte:

  1. Öffne das VBA-Editor: Drücke ALT + F11 in Excel.

  2. Füge eine Userform hinzu:

    • Klicke im Menü auf Einfügen und wähle UserForm.
  3. Füge Textfelder hinzu:

    • Ziehe drei TextBox-Steuerelemente auf die Userform.
  4. Füge einen OK-Button hinzu:

    • Ziehe ein CommandButton-Steuerelement auf die Userform.
  5. Code für den OK-Button:

    • Doppelklicke den OK-Button und füge folgenden Code ein:
    Private Sub CommandButton1_Click()
       Dim eingabe1 As String
       Dim eingabe2 As String
       Dim eingabe3 As String
    
       eingabe1 = TextBox1.Text
       eingabe2 = TextBox2.Text
       eingabe3 = TextBox3.Text
    
       ' Hier kannst du die Eingaben weiterverarbeiten
       MsgBox "Eingaben: " & eingabe1 & ", " & eingabe2 & ", " & eingabe3
    
       Unload Me
    End Sub
  6. Userform anzeigen:

    • Um die Userform anzuzeigen, kannst du folgenden Code verwenden:
    Sub zeigeUserform()
       UserForm1.Show
    End Sub

Häufige Fehler und Lösungen

  • Fehler: Die Userform erscheint nicht.

    • Lösung: Stelle sicher, dass der Code zur Anzeige der Userform korrekt ist und dass die Userform nicht im Hintergrund geöffnet ist.
  • Fehler: Eingaben werden nicht erkannt.

    • Lösung: Überprüfe den Code im OK-Button und stelle sicher, dass die TextBoxen korrekt benannt sind.

Alternative Methoden

Wenn du keine Userform erstellen möchtest, gibt es auch andere Ansätze:

  1. Erstellung mehrerer Inputboxen hintereinander:

    Sub mehrereInputboxen()
       Dim eingabe1 As String
       Dim eingabe2 As String
       Dim eingabe3 As String
    
       eingabe1 = InputBox("Gib den ersten Wert ein:")
       eingabe2 = InputBox("Gib den zweiten Wert ein:")
       eingabe3 = InputBox("Gib den dritten Wert ein:")
    
       MsgBox "Eingaben: " & eingabe1 & ", " & eingabe2 & ", " & eingabe3
    End Sub
  2. Nutze ein externes Formular: Wenn du eine komplizierte Eingabe benötigst, kannst du auch ein Excel-Arbeitsblatt verwenden, um die Eingaben zu organisieren.


Praktische Beispiele

Hier ist ein einfaches Beispiel, wie du eine Userform mit den gewünschten Eingabefeldern gestalten kannst:

  1. Userform mit 3 Textboxen:

    • TextBox1: Name
    • TextBox2: Alter
    • TextBox3: Stadt

    Der Benutzer gibt seinen Namen, sein Alter und seine Stadt ein und klickt auf den OK-Button, um die Informationen anzuzeigen.

  2. Verwendung in einem Projekt:

    • Diese Userform kann in einem Projekt verwendet werden, in dem du mehrere Informationen von einem Benutzer benötigst, z. B. zur Datenerfassung oder für Einstellungen.

Tipps für Profis

  • Gestalte die Userform ansprechend: Achte darauf, dass die Userform benutzerfreundlich gestaltet ist. Verwende Labels, um die Textboxen zu beschriften.
  • Validierung der Eingaben: Implementiere eine Validierung, um sicherzustellen, dass die Eingaben korrekt sind, bevor sie weiterverarbeitet werden.
  • Speichere Einstellungen: Du kannst die eingegebenen Werte in einer Excel-Tabelle speichern, um sie später zu verwenden oder zu analysieren.

FAQ: Häufige Fragen

1. Kann ich die Userform anpassen?
Ja, du kannst die Userform anpassen, indem du verschiedene Steuerelemente hinzufügst oder das Design änderst.

2. Welche Excel-Versionen unterstützen die Userform?
Die Userform-Funktionalität ist in allen aktuellen Excel-Versionen verfügbar, die VBA unterstützen, einschließlich Excel 2010 und neuer.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige