Wie verwende ich die Funktion InputBox in VBA?

In VBA (Visual Basic for Applications) wird die Funktion `InputBox` verwendet, um den Benutzer zur Eingabe von Daten aufzufordern. Diese Funktion öffnet ein einfaches Dialogfeld, in das der Benutzer Daten eingeben kann. Hier ist ein einfaches Beispiel zur Verwendung der `InputBox`-Funktion in einem VBA-Skript:

Sub VerwendeInputBox()
    Dim eingabe As String
    Dim nachricht As String
    
    ' Verwenden der InputBox-Funktion, um Benutzereingaben zu sammeln
    eingabe = InputBox("Bitte geben Sie Ihren Namen ein:", "Benutzername Eingabe")
    
    ' Überprüfen, ob der Benutzer Eingaben gemacht hat
    If eingabe <> "" Then
        nachricht = "Hallo, " & eingabe & "! Willkommen in unserem Programm."
    Else
        nachricht = "Sie haben keinen Namen eingegeben."
    End If
    
    ' Nachrichtbox anzeigen
    MsgBox nachricht
End Sub

Erläuterung der Parameter der InputBox-Funktion:

Prompt: Ein Stringausdruck, der die im Dialogfeld angezeigte Nachricht darstellt. Im Beispiel oben ist es “Bitte geben Sie Ihren Namen ein:”.
Title (optional): Ein String, der den Titel des Dialogfelds angibt. Im Beispiel oben ist es “Benutzername Eingabe”.
Default (optional): Ein Standardwert, der im Texteingabefeld angezeigt wird, bevor der Benutzer etwas eingibt.
XPos (optional): Die horizontale Bildschirmposition des Dialogfelds in Twips. Wird dieser Wert weggelassen, wird das Dialogfeld horizontal zentriert.
YPos (optional): Die vertikale Bildschirmposition des Dialogfelds in Twips. Wird dieser Wert weggelassen, wird das Dialogfeld vertikal positioniert, sodass der höchste Teil des Titels im sichtbaren Bereich erscheint.
HelpFile (optional): Der Name einer Hilfedatei, die Kontext-sensitive Hilfe bereitstellt.
Context (optional): Die Kontextnummer des betreffenden Hilfethemas.

Dieses einfache Skript zeigt, wie Sie die `InputBox` nutzen können, um Benutzereingaben zu erhalten und diese dann in einer `MsgBox` darzustellen. Anpassungen können vorgenommen werden, indem zusätzliche Parameter oder weitere Logik hinzugefügt werden, um die Funktionalität zu erweitern.

facebooklinkedin