Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
876to880
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
876to880
876to880
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Import *.csv Dateien

Import *.csv Dateien
08.06.2007 15:28:00
Johannes
Hallo Spezialisten,
ich hätte gerne von Euch 'nen Hinweis was hier verkehrt läuft:
Eine *.csv Datei erscheint nach dem Öffnen inm ÖffnenDialog mit *alle Dateien* in der gewünschten Trenung der Inhalte in die einzelnen Zellen.
04.06.2007 14:00:00 316 0 511 3 631 1
Wenn ich das jedoch mit:
Workbooks.Open Filename:= _
"S:\Daten Allgemein\BDE\2007_06_6-3-Nachtschicht.csv"
mache erscheint der Inhalt nur in den Zellen der Spalte A mit Semikolon getrennt
04.06.2007;14:00:00;316;0;511;3;631;1
Warum passiert das, bzw wie muss der Befehl lauten, damit das eben so aussieht wie beim manuellen öffnen?
Vielen Dank für Eure Hilfe schon jetzt.
Gruß
Johannes

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Import *.csv Dateien
selli
hallo johannes,
öffne eine datei von hand und zeichne den vorgang mit dem rekorder auf.
anschliessend übernimmst du die parameter des afgezeichneten makros in deinen code und dann sollte es gehen.
hab es nicht getestet. so würde ich es jetzt erstmal versuchen.
gruß selli

AW: Import *.csv Dateien
selli
lösung vi vba für spalte "A":

Private Sub CommandButton1_Click()
Dim a
For a = 1 To Cells(Rows.Count, 1).End(xlUp).Row
Cells(a, 1) = Cells(a, 1).Value * 10
Next a
End Sub


gruß selli

letzter Beitrag - falsches thema
selli
sorry bin in der spalte verrutscht.

Anzeige
AW: letzter Beitrag - falsches thema
11.06.2007 15:13:00
Tino
Hallo,
kannst mal so eine Datei hochladen?
Gruss
Tino

AW: Import *.csv Dateien
11.06.2007 09:09:46
Johannes
Hallo zusammen,
genau das habe ich ja gemacht und obiges Ergebnis erhalten (?)
Hat evtl jemand eine Erklärung hierfür? Danke für Eure Hilfe.
Gruß
Johannes

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige