Es kann vorkommen, dass ein Makro Informationen in einer Textdatei speichern soll. Dies ist sehr einfach zu tun. Sie müssen lediglich die Datei für die Ausgabe öffnen und dann Informationen an die Datei senden. Das folgende Codefragment schreibt eine Textdatei mit dieser Methode.

Open "MyFile.Dat" For Output As #1 Print #1, NumValues For J = 1 to NumValues     Print #1, UserVals(J)

Next J Close #1

Das erste, was in die Datei geschrieben wird, ist ein numerischer Wert, der angibt, wie viele einzelne Werte darauf folgen (der Code setzt voraus, dass Sie diesen Wert in der Variablen NumValues ​​festlegen). Dann wird eine For …​ Next-Schleife verwendet, um den Saldo der Datei zu erstellen.

Sie sollten sich bewusst sein, dass der geschriebene Code alle vorhandenen MyFile.Dat-Dateien überschreibt. Wenn Sie die Datei auf irgendeine Weise schützen möchten, muss Ihr Code vor dem Öffnen überprüfen, ob sie vorhanden ist, oder Sie müssen die Attribute der Datei auf schreibgeschützt setzen.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (8885) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365. Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier:

Informationen in einer Textdatei speichern.