Thema Datum  Von Nutzer Rating
Antwort
26.10.2015 19:55:48 joerg
*****
NotSolved
26.10.2015 20:49:32 Gast20055
*****
NotSolved
26.10.2015 21:23:29 joerg
NotSolved
Blau Textdatei in bestehende Arbeitsmappe einlesen? - Ja, mittels QueryTable geht das.
 28.10.2015 13:46:35 GastO815
*****
NotSolved
28.10.2015 19:32:50 joerg
*****
NotSolved
31.10.2015 10:21:56 Gast53933
NotSolved
31.10.2015 10:47:09 joerg
NotSolved
02.11.2015 01:52:34 GastO815
NotSolved
02.11.2015 18:45:24 joerg
NotSolved

Ansicht des Beitrags:
Von:
GastO815		 Datum:
28.10.2015 13:46:35		 Views:
499		 Rating:
     
Antwort:
  Ja
Thema:
Textdatei in bestehende Arbeitsmappe einlesen? - Ja, mittels QueryTable geht das.		 
Option Explicit

Sub Bsp()
  
  Dim strFilename As String
  
  strFilename = "D:\beispiel.txt"
  
  With Worksheets("Tabelle1")
    With .QueryTables.Add("TEXT;" & strFilename, Destination:=.Range("A1"))
      'verwende Codepage: Windows-1252 (Westeuropäisch); Alias 'Latin-1'
      .TextFilePlatform = 1252
      'ggf. bereits bestehende Zelleninhalte überschreiben
      .RefreshStyle = XlCellInsertionMode.xlOverwriteCells
      'Spalten sind mit Semicolon (;) voneinander getrennt
      .TextFileSemicolonDelimiter = True
      'Daten importieren
      Call .Refresh(BackgroundQuery:=False)
      'Abfrage wieder entfernen (Daten bleiben weiterhin erhalten)
      Call .Delete
    End With
  End With
  
End Sub

Damit ist man völlig frei auf weilches Blatt man die Daten "schaufeln" will (ggf. erstellt man vorher ein neues).

 

PS: siehe CSV-Datei

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
26.10.2015 19:55:48 joerg
*****
NotSolved
26.10.2015 20:49:32 Gast20055
*****
NotSolved
26.10.2015 21:23:29 joerg
NotSolved
Blau Textdatei in bestehende Arbeitsmappe einlesen? - Ja, mittels QueryTable geht das.
 28.10.2015 13:46:35 GastO815
*****
NotSolved
28.10.2015 19:32:50 joerg
*****
NotSolved
31.10.2015 10:21:56 Gast53933
NotSolved
31.10.2015 10:47:09 joerg
NotSolved
02.11.2015 01:52:34 GastO815
NotSolved
02.11.2015 18:45:24 joerg
NotSolved