Thema Datum  Von Nutzer Rating
Antwort
28.06.2014 21:36:43 Tribal
NotSolved
28.06.2014 22:52:38 Gast74988
NotSolved
29.06.2014 02:30:07 Gast89069
NotSolved
29.06.2014 16:41:14 Tribal
NotSolved
Rot Excel VBA - Zeichenkette suchen und ersetzten
29.06.2014 17:42:01 Gast19313
NotSolved
29.06.2014 20:48:26 Tribal
NotSolved
29.06.2014 21:43:54 Gast11929
NotSolved
29.06.2014 21:46:08 Gast96854
*****
Solved
29.06.2014 23:37:35 Tribal
Solved

Ansicht des Beitrags:
Von:
Gast19313
Datum:
29.06.2014 17:42:01
Views:
909
Rating: Antwort:
  Ja
Thema:
Excel VBA - Zeichenkette suchen und ersetzten

Ok, du gehst die Sache also komplett per Hand an.

Versuch es mal damit:

Option Explicit

Sub Test()
  
  With Worksheets(1)
    With .QueryTables.Add("TEXT;", .Range("A1"))
      
      .Connection = .Connection & "X:\test.csv"
      .TextFilePlatform = 1252 'Windows-1252 (ANSI) Codepage verwenden
      
      .TextFileParseType = xlDelimited
      .TextFileSemicolonDelimiter = True
      .TextFileTextQualifier = xlTextQualifierDoubleQuote
      
      .RefreshStyle = xlOverwriteCells
      .Refresh
      
      .Delete 'QueryTable wieder entfernen (Daten bleiben dennoch erhalten)
    End With
  End With
  
End Sub

Durch die hier gewählte Codepage  werden auch die Umlaute korrekt dargestellt (Trennzeichen ist das Semikolon, du kannst aber auch andere angeben).


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
28.06.2014 21:36:43 Tribal
NotSolved
28.06.2014 22:52:38 Gast74988
NotSolved
29.06.2014 02:30:07 Gast89069
NotSolved
29.06.2014 16:41:14 Tribal
NotSolved
Rot Excel VBA - Zeichenkette suchen und ersetzten
29.06.2014 17:42:01 Gast19313
NotSolved
29.06.2014 20:48:26 Tribal
NotSolved
29.06.2014 21:43:54 Gast11929
NotSolved
29.06.2014 21:46:08 Gast96854
*****
Solved
29.06.2014 23:37:35 Tribal
Solved