Thema Datum  Von Nutzer Rating
Antwort
Rot VBA EXCEL Auswahl der Datei via Exporer
 12.06.2013 14:32:39 Gast83014
NotSolved
14.06.2013 14:01:35 Holger
NotSolved

Ansicht des Beitrags:
Von:
Gast83014		 Datum:
12.06.2013 14:32:39		 Views:
1448		 Rating:
     
Antwort:
  Ja
Thema:
VBA EXCEL Auswahl der Datei via Exporer

Moin Moin,

habe via Recorder ein Mackro gebastel um in eine Arbeismappei zwei *TXT Dateien zu importieren. Da ich viele verschiedene TxT Datein immer wieder so importiern muss wäre es besser wenn ich dies über den explorer auswählen könnte. Da ich so gut wie keine Ahnung von VBA habe wäre es toll wenn mir jemand helfen könnte.

Anbei die entsprechende Stelle aus der Aufzeichnung:

 

Sheets.Add After:=Sheets(Sheets.Count)
    Sheets("Tabelle1").Select
    Sheets("Tabelle1").Name = "T1" ' Umbenennen von Tabellenblatt 1 in T1
    Range("A1").Select
    With ActiveSheet.QueryTables.Add(Connection:= _
        "TEXT;C:\Users\peter.urban\Desktop\Mehr-Minder\alt.txt", _
        Destination:=Range("$A$1"))

' Die Datei alt, (kann auch anders heißen) sollte möglichst über Explorer eusgewählt werden
        .Name = "alt"

' an dieser Stelle muss dann der name der ausgewählten Datei stehen
        .FieldNames = True
        .RowNumbers = False

nicht dargestellte vortsetztung der Aufzeichnung

Gruß

Peter

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
Rot VBA EXCEL Auswahl der Datei via Exporer
 12.06.2013 14:32:39 Gast83014
NotSolved
14.06.2013 14:01:35 Holger
NotSolved