Thema Datum  Von Nutzer Rating
Antwort
18.10.2016 07:51:43 TobiasT.
NotSolved
18.10.2016 12:00:50 BigBen
NotSolved
18.10.2016 13:44:36 TobiasT.
NotSolved
Blau Textdatei zeilenweise in Excel importieren
 18.10.2016 20:02:18 BigBen
NotSolved
19.10.2016 08:32:40 TobiasT.
NotSolved

Ansicht des Beitrags:
Von:
BigBen		 Datum:
18.10.2016 20:02:18		 Views:
690		 Rating:
     
Antwort:
  Ja
Thema:
Textdatei zeilenweise in Excel importieren

Hallo,

im ersten Ansatz fällt mir nur folgendes ein:

Sub ImportSpecial()
    Dim strFile As String
    Dim frNr As Integer
    Dim iLineNr  As Integer
    Dim iLineFirst As Integer
    Dim iLinesCount As Integer
    Dim strLine As String
    
    iLineFirst = 3  ' Erste Zeile, die importiert werden soll
    iLinesCount = 2 ' Anzahl der zu importierenden Zeilen
    
    strFile = "Z:\Temp\Datei 2.txt"
    frNr = FreeFile
    Open strFile For Input As #frNr
    Do Until EOF(frNr)
        iLineNr = iLineNr + 1
        Line Input #frNr, strLine
        If iLineNr >= iLineFirst And iLineNr < iLineFirst + iLinesCount Then
            Debug.Print iLineNr, strLine
        End If
    Loop
    Close #frNr
End Sub

Bei diesem Lösungsansatz wird die Textdatei zeilenweise ausgelesen.

Mit den Variablen iLineFirst und iLinesCount wird der Umfang eingegrenzt.

Es fehlt noch die Funktion zum Importieren der ausgelesenen Zeilen. In der Sub werden alle zu importierenden Zeilen lediglich via debug.print in der Konsole ausgegeben.

Diese Sub nimmt keinerlei Zeichensatz-Konvertierungen vor.

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
18.10.2016 07:51:43 TobiasT.
NotSolved
18.10.2016 12:00:50 BigBen
NotSolved
18.10.2016 13:44:36 TobiasT.
NotSolved
Blau Textdatei zeilenweise in Excel importieren
 18.10.2016 20:02:18 BigBen
NotSolved
19.10.2016 08:32:40 TobiasT.
NotSolved