Microsoft Office Tutorials and References
In Depth Information
9.1.3 Schreiben in Textdateien
Exit Sub
Fehler:
MsgBox (Err.Description)
End Sub
Das Ergebnis:
Abbildung 9.4
Importierte Datensätze
Zur Erläuterung:
Die Anwendung ist eine Erweiterung des vorherigen Beispiels »Lesen
aus Textdateien«. An dieser Stelle werden nur die zusätzlichen Kom-
ponenten erläutert.
Programm-
erweiterung
Es wird ein dynamisches Datenfeld deklariert. Dieses wird für das
Zerlegen der Zeilen benötigt.
Nach dem Lesen einer Zeile wird die Zeile mit der Funktion Split()
zerlegt und in dem dynamischen Datenfeld gespeichert.
Split()
Alle Elemente des Datenfelds werden nebeneinander in einzelnen
Zellen ausgegeben. Die Anzahl der Elemente eines Datensatzes und
damit die Obergrenze des dynamischen Datenfelds werden mit der
Funktion UBound() erkannt.
UBound()
9.1.3
Schreiben in Textdateien
Es folgt zunächst das einfache Schreiben der in Abbildung 9.5 dargestel-
ten Excel-Tabelleninhalte in eine Textdatei.
Excel-Daten
schreiben
Abbildung 9.5
Daten, die exportiert werden sollen
Search JabSto ::




Custom Search