Thema Datum  Von Nutzer Rating
Antwort
Rot CSV Open funktioniert nicht trotz Local:=True
 11.12.2018 14:59:21 Felix Excel
NotSolved
11.12.2018 15:36:24 Gast92831
Solved
11.12.2018 18:19:20 Gast12046
Solved
12.12.2018 13:16:19 Felix Excel
NotSolved

Ansicht des Beitrags:
Von:
Felix Excel		 Datum:
11.12.2018 14:59:21		 Views:
967		 Rating:
     
Antwort:
  Ja
Thema:
CSV Open funktioniert nicht trotz Local:=True		 
Hallo zusammen, 

ich versuche ein Makro zu basteln, welches mir eine CSV-Datei in einer Excel-Tabelle öffnet. Leider erkennt er die Komma-Trennung der Datei nicht und öffnet deshalb alle Daten in der ersten Spalte. Selbst der Local:= True Parameter hat mir nicht geholfen. Nun bin ich leider mit meinem Latein am Ende...

Ich hoffe jemand hat einen Tipp für mich. 

Vielen Dank
Felix

Sub OpenCSV()

Dim ZielDatei As Object 'Input Workbook
Dim ZielDatei_Pfad As String 'Pfad Input Workbook
Dim sht As Worksheet

MsgBox ("Wählen Sie bitte nun die Datei aus, welche alle Kunden beinhaltet") 'Input Workbook abfragen
ZielDatei_Pfad = Application.GetOpenFilename()
If ZielDatei_Pfad = "Falsch" Then Exit Sub

Set ZielDatei = Workbooks.Open(ZielDatei_Pfad, Local:=True)
Set sht = ZielDatei.ActiveSheet

End Sub()

 

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 CSV Open funktioniert nicht trotz Local:=True
 11.12.2018 14:59:21 Felix Excel
NotSolved
11.12.2018 15:36:24 Gast92831
Solved
11.12.2018 18:19:20 Gast12046
Solved
12.12.2018 13:16:19 Felix Excel
NotSolved