Wie erstelle ich Eingabe- und Meldungsfelder in einem Word-Dokument mit VBA?

Letzte Aktualisierung: Juli 2020; Anwendbarkeit: Office 365, 2019, 2016, 2013.

Manchmal möchten wir unsere Word-Dokumente interaktiver gestalten und sogar einige Benutzereingaben erfassen. Nachricht und Eingabefelder eingeben .

Wie der Name schon sagt, handelt es sich bei einem Meldungsfeld um eine Information, die den Benutzern des Dokuments angezeigt wird. Eingabefelder dienen dazu, Informationen vom Benutzer zu erfassen.

Dieser Beitrag enthält alle Informationen und Codebeispiele, die Sie benötigen, um voll funktionsfähige Dokumente mit VBA-Nachrichten (Visual Basic for Applications) und Eingabefeldern für Microsoft Word zu erstellen.

Wie fügt man VBA-Code in Word ein?

Bevor wir fortfahren und erklären, wie Sie Meldungs- und Eingabefelder hinzufügen, hier eine kurze Auffrischung, wie Sie Ihren benutzerdefinierten VBA-Code zu einem Word-Dokument hinzufügen.

• Fahren Sie zunächst fort und aktivieren Sie die Registerkarte Entwickler .
• Klicken Sie nun auf der  Registerkarte „ Entwickler  “ auf die Schaltfläche  „ Visual Basic “. Dadurch wird der Visual Basic-Editor geöffnet.

• Markieren Sie Ihr Dokument.
• Klicken Sie  auf Einfügen  und wählen Sie dann  Modul aus .

• Kopieren Sie den unten bereitgestellten Code in das Modul, das Sie gerade erstellt haben, in Ihr Modul.
• Klicken Sie auf Speichern. Geben Sie Ihrem Dokument einen Namen, wenn Sie dazu aufgefordert werden.
• Schließen Sie den Visual Basic-Editor.

Meldungsfelder VBA-Code

Syntax:

MsgBox (Eingabeaufforderung, Schaltflächen, Titel, Hilfedatei, Kontext)

Syntaxerklärung:

Prompt:

Erforderlich. Es sind die Informationen, die dem Benutzer gegeben werden können. Es sollte innerhalb des  doppelten Anführungszeichens eingefügt werden .

Tasten:

Optional. Schaltflächen sind solche Schaltflächen, die den Benutzern Informationen geben. Für MsgBox() stehen verschiedene Schaltflächen zur Verfügung, die auf den Bildern unten zu finden sind.

Titel:

Optional. Es ist der Titel für die Informationen, die dem Benutzer gegeben werden. Wenn nicht angegeben, ist  Microsoft Word  der Standardtitel.

Hilfedatei und Kontext:

• Optional. Helpfile identifiziert die auf der lokalen Festplatte verfügbare Hilfedatei, die als Hilfe in einem Dialogfeld bereitgestellt werden kann
• Optional. Kontext ist ein numerischer Ausdruck, der verwendet wird, um das Hilfethema durch die eindeutige Nummer zu identifizieren.

Beispielcode für das Nachrichtenfeld

'VBA
Sub messagebox()

'Variables assigned

Dim buttonclick As VbMsgBoxResult

'Message box to display information to user

MsgBox "Hi, Visual Basic is easy to work with", vbExclamation, "VBA"

'Message box to ask question to user with yes or no question
buttonclick = MsgBox("Do you like VBA?", vbQuestion + vbYesNo, "VBA")
If buttonclick = vbYes Then
MsgBox "Yes, they are great!", vbExclamation, "VBA"
Else
MsgBox "Why not? They are great!", vbCritical, "VBA"
End If

End Sub

Ausgabe:

Dialog- und Eingabefelder VBA-Code

Das Eingabefeld ist ein einfacher Dialog, der es uns ermöglicht, den Benutzer zur Eingabe einiger Informationen aufzufordern. Machen wir uns anhand eines Beispiels mit dem VBA-Code vertraut.

Syntax:

InputBox (Eingabeaufforderung, Titel, Standard, XPos, YPos, Hilfedatei, Hilfekontext-ID, Typ)

Syntaxerklärung:

Prompt:

Erforderlich. Es sind die Informationen, die dem Benutzer gegeben werden können. Es sollte innerhalb des  doppelten Anführungszeichens eingefügt werden .

Titel:

Optional. Es ist der Titel für die Informationen, die dem Benutzer gegeben werden. Wenn nicht angegeben, ist  Microsoft Word  der Standardtitel.

Standard:

Optional. Es zeigt den Standardwert im Textfeld an, bevor der Benutzer einen Wert eingibt. Wenn nicht angegeben, ist das Textfeld leer.

XPos:

Optional. Sie wird als Position auf der X-Achse verwendet. Von links nach rechts

YPos:

Optional. Sie wird als Position auf der Y-Achse verwendet. Von oben nach unten

Hilfedatei und HelpContext-ID:

• Optional. Helpfile identifiziert die auf der lokalen Festplatte verfügbare Hilfedatei, die als Hilfe in einem Dialogfeld bereitgestellt werden kann
• Optional. HelpContext ID ist die ID-Nummer für die Hilfedatei.

Eingabefeldcode:

'VBA
Sub macro()

'Variables assigned
Dim a As Long
Dim b As Long

'Input box to get value from user

a = InputBox("Enter a value for a", "Question 1")
b = InputBox("Enter a value for b", "Question 2")

'Answer displayed in a message box
MsgBox ("Answer is " & Val(a) + Val(b))
End Sub

Ausgabe: