Thema Datum  Von Nutzer Rating
Antwort
16.04.2008 19:16:59 Kris
NotSolved
Blau Aw:Textdatei auslesen, Werte aus Textzeile in Zell
 17.04.2008 08:54:11 jh
NotSolved
17.04.2008 16:53:52 Kris
NotSolved
18.04.2008 07:57:56 jh
NotSolved

Ansicht des Beitrags:
Von:
jh		 Datum:
17.04.2008 08:54:11		 Views:
930		 Rating:
     
Antwort:
  Ja
Thema:
Aw:Textdatei auslesen, Werte aus Textzeile in Zell
Hallo,

zusammengesetzte Strings mit konstantem Trennzeichen
werden mit der Split-Funktion getrennt.

Dim strInput As String ' eine eingelesene Zeile
Dim strDelimiter As String ' das Trennzeichen
Dim vntArray As Variant ' Array mit den Bestandteilen
Dim i As Integer, j As Integer
strDelimiter = Chr$(32) ' Space
i = 1
Open "C:\Test.txt" For Input As #1
Do
Line Input #1, strInput
vntArray = Split(strInput, strDelimiter)
' Werte in Zellen schreiben:
For j = 0 To UBound(vntArray)
Cells(i, j) = vntArray(j)
Next j
i = i + 1
Loop Until EOF(1)
Close #1

Gruß

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
16.04.2008 19:16:59 Kris
NotSolved
Blau Aw:Textdatei auslesen, Werte aus Textzeile in Zell
 17.04.2008 08:54:11 jh
NotSolved
17.04.2008 16:53:52 Kris
NotSolved
18.04.2008 07:57:56 jh
NotSolved