Tabellenbereiche in eine Textdatei schreiben
16.08.2003 21:57:49
Stef@n
ich möchte einige Tabellenbereiche in eine Textdatei schreiben.
Erstmal ist mir diese Variante eingefallen:
Sub SaveTxt()
Open "C:\Tabelle.txt" For Output As #1
For i = 1 To 100
Print #1, ":N: 0002"
Print #1, ":T: " + "Zeile" + Str(i)
Print #1, ":A: Q0 D-"
Print #1, ""
Next i
Close #1
End Sub
Ich brauche aber einige Wörter in "" ("Beispiel".
Damit geht's nicht.
Habt ihr eine Lösung..??
D A N K E..!!
Anzeige