Eingabe aus einer Textdatei (Microsoft Word)
Getreu seinen BASIC-Wurzeln können Sie mit VBA Eingaben (Informationen) aus sequentiellen Dateien abrufen. Dies bedeutet, dass Sie eine sequentielle Textdatei öffnen und lesen können, indem Sie die Informationen aus der Datei in Zeichenfolgenvariablen laden. Die Schritte sind einfach. Sie müssen nur die Datei öffnen, die Eingabe abrufen und dann die Datei schließen. Der folgende Code ist ein häufiges Beispiel für das Lesen aus einer sequentiellen Datei:
Dim Raw As String Dim NumValues As Integer, J As Integer Dim UserVals() As String Open "MyFile.Dat" For Input As #1 Line Input #1, Raw NumValues = Val(Raw) ReDim UserVals(NumValues) For J = 1 to NumValues Line Input #1, UserVals(J) Next J Close #1
Sie sollten beachten, dass die erste Zeile aus der Textdatei (MyFile.Dat)
gelesen wird Es wird angenommen, dass es einen Wert enthält, der angibt, wie viele Elemente aus der Datei eingelesen werden sollen. Die Open-Anweisung wird verwendet, um die Textdatei (MyFile.Dat) zu öffnen und ihr eine Dateinummer zuzuweisen, in diesem Fall die Nummer 1.
Diese Dateinummer wird anschließend von verschiedenen Anweisungen (z. B. Line Input und Close) verwendet, um auf die Datei zu verweisen.
_Hinweis: _
Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.
WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.
(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (10477) gilt für Microsoft Word 2007, 2010, 2013 und 2016. Eine Version dieses Tipps für die ältere Menüoberfläche von Word finden Sie hier: