Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Button in UserForm soll CSV in neuer Instanz öffne

Button in UserForm soll CSV in neuer Instanz öffne
05.08.2008 00:11:00
Meier
Hi,
ich habe ein UserForm mit einem Button_Click_Ereignis, bei dem eine CSV-Datei in einer neuen Excel-Instanz geöffnet werden soll.
Bisher habe ich es mit folgendem versucht:
Workbooks.OpenText "d:\excel\test.txt", DataType:=xlDelimited, Semicolon:=True
Leider öffnet sich weder eine neue Instanz, noch werden die mit ";" getrennten Werte in der CSV in gesonderten Spalten dargestellt. Jeder "Datensatz" der CSV wird in Spalte 1, mit allen Werten, getrennt durch ";" dargestellt.
Ich hätte es aber gerne so, als wenn ich die CSV durch Doppelklick direkt mit Excel öffne und alle Werte in getrennten Spalten dargestellt werden.
Danach sollen die Zeilen nach den Werten in Spalte B (aufsteigend) , D (aufsteigend), E (absteigend) sortiert werden.
Habe schon ne Menge gegoogled. Leider haben die meisten Tipps mit "klappt auch nicht" oder "das ist ein MS Bug" aufgehört.
Hat jemand ne Lösung?
Danke, Gruß Jörg

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Button in UserForm soll CSV in neuer Instanz öffne
05.08.2008 00:25:20
Daniel
Hi
lass doch einfach nach dem Öffnen noch ein DATEN-TEXT in SPALTEN drüberlaufen,
dann bekommst du, was du willst
wie der MakroCode dazu aussieht, kannst du mit dem Recorder rausfinden, ebenso das anschließende Sortieren.
im Prinzip halt so:

Columns("A:A").TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=True, Comma:=False, Space:=False, Other:=False
Cells(1, 1).CurrentRegion.Sort _
Key1:=Cells(1, 2), order1:=xlAscending, _
Key2:=Cells(1, 4), order2:=xlAscending, _
key3:=Cells(1, 5), order3:=xlDescending, header:=xlGuess


Gruß, Daniel

Anzeige

120 Forumthreads zu ähnlichen Themen


Hallo,
kann mir jdm sagen, wir ich eine Tabelle, die in lauter Großbuchstaben geschreiben ist in kleine ändern kann?
Die Funktion =klein(Text) funktioniert leider nicht....
Vielen Dank!

Hallo
ich habe folgendes Problem:
ich speichere eine Datei nach einer ganz bestimmten Syntax:
Projektnummer_Projektname_Dokument_1.xls
Wie kann ich aus dem abgespeicherten Namen (also aus activeworkbook.name) die einzelnen Bestandteile auslesen und als String wider ausgeben? (Sp...

Guten Abend
Um eine CSV-Datei mit ;-Delimiter zu schreiben habe ich einen Code im Netz gefunden und in meinen Code integriert.
Der Code läuft nun, doch es hat noch ein paar Bestandteile, die ich nicht verstehe. Wer kann mir die nötigen Hints geben?
1. Was bedeutet "DateiNummer = Fre...

Hallo Excel Fans,
wie kan ich den Nachnamen außer dem ersten in Kleinbuchstaben und Fett formatiert umwandeln (Zahl und Nachname nicht verändern). 1 KAHN, Oliver
 22 FRINGS, Torsten
 13 BALLACK, MichaelGruß Harald
Vielen Dank für eure Hilfe

Hallo Forumsbesucher,
ich möchte, dass alle Eingaben im Zellbereich A1:A10 in Grossbuchstaben erscheinen.
Im Voraus vielen Dank für eure Unterstützung.
mfg
Fritz

Hallo zusammen!
Ich habe ein Makro welches mir xls. Dateien einliest und an eine bestimmte Stelle kopiert. Leider steigen wir derzeit auf das CSV Format um. Daher brauche ich eine Möglichkeit CSV Dateien einzulesen und diese dann in ein anständiges Format umzuwandeln. Das derzeitige Einfüge...

Links zu Excel-Dialogen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige