Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Bewerten Sie hier bitte das Excel-Portal
Home Zurück Vor
Download Beispiel-Arbeitsmappe

Thema

Textimport aus Text-Datei mit Smikoli als Feldtrenner

Gruppe

TextImport

Problem

Wenn ich eine Text-Datei manuell importiere, wird das Semikolon als Feldseparator erkannt, steuere ich diese Vorgang über ein englischsprachiges Makro, ist dies nicht der Fall. Wie kann ich das ändern?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub Import()
   Dim sFile As String
   sFile = Range("B1").Value
   If Dir(sFile) = "" Then
      MsgBox "Datei wurde nicht gefunden!"
      Exit Sub
   End If
   Workbooks.OpenText sFile, _
      DataType:=xlDelimited, Semicolon:=True
End Sub

Beiträge aus dem Excel-Forum zu den Themen Extern und TextImport

Dateiname externer Datei ändern
Tabellenblatt aus externer Exceldatei kopieren
ConboBox mit externe Daten füllen
Textimportassistent
Wert in externer Datei suchen
Aufruf externer Programme
Externe Bezüge auslesen mit VBA
Externe Verküpfung anpassen
Pivot mit Externer DB am Limit?
Externe Verknüpfungen
Blätter in Externer Arbeitsmappe einblenden
externes Verzeichnis ansprechen
Externe Datenquelle via VBA
Pivot mit Externer DB UNION funzt nich
Nur externe Bezüge rausnehmen
*xlt-Dateien als externe Datenquelle nutzen
Externes Programm öffnen
Makro: Bezug auf externes xls-File?
Wert an externes Programm übergeben
Externe Excel-Verknüpfungen automatisiert ändern
Verlinkung externer Arbeitsmappen
Tabelle in externer Datei löschen
externe Bezüge suchen/ersetzen
neue Zeile und externe Bezüge....
Externe Verknüpfung finden
externe Bezüge
Summenprodukt + Externe Bezüge
Datenbank in externer Datei
Textimport-Assistent
Fehler beim Kopieren von externer Tabelle
anzahl Blätter externer Excel-Datei
Externe Daten aus Access
Anpassung Makro für Textimport
Externe Daten importieren aus Access
Zellwert als Parameter f. externes Script/Programm
Worksheetzugriff auf externe Datei
Dropdown - externe Daten
Externe Bezüge
Zeitanzeige auf USF wenn ein externes Progr. läut
Externe Daten (QueryTable) ab 1 nummerieren
Schnittstelle extern mit Lampen
Zelleninhalt für externes Programm kopieren
Archivieren externer Dateien in Arbeitsblatt
Externer Vergleich
externe Verknüpfung per Makro einfügen
Externe Verknüpfungen
Externen Text mit Makro einfügen
Abfragekriterium externe Daten verändern
Daten aus externer Mappe einfügen
externes Programm ausführen