Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
644to648
644to648
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Was wäre die einfachste Lösung zum Einlesen TXT

Forumthread: Was wäre die einfachste Lösung zum Einlesen TXT

Was wäre die einfachste Lösung zum Einlesen TXT
29.07.2005 11:21:27
Henrik
Liebe Forumer,
welche Lösung wäre die simpelste und einfachste um Textdateien auf Kommastellen auszulesen?
Vielen Dank für eure Antworten im Vorraus
Euer
Henrik
Anzeige

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

Betreff
Datum
Anwender
Anzeige
Importieren o.w.T
29.07.2005 11:24:40
Unbekannter
AW: Was wäre die einfachste Lösung zum Einlesen TXT
29.07.2005 11:24:48
MichaV
Hallo
was ist denn "auf Kommastellen auszulesen"?
Anzahl der Kommas?
Gruss- Micha
AW: Was wäre die einfachste Lösung zum Einlesen TX
29.07.2005 11:28:05
Henrik
Wie kann man eine CSV - Datei mit VB auslesen?
Und dann darin als Variablen verarbeiten?
Wäre dankbar für ANtwort
euer
Henrik
Anzeige
AW: Was wäre die einfachste Lösung zum Einlesen TX
29.07.2005 11:49:24
MichaV
Hallo,
"Und dann darin als Variablen verarbeiten?" .. was auch immer Du meinst.
Dieser Code liest Deine CSV in ein Datenfeld ein.


      
Option Explicit
Sub HenrikASHonduras()
Dim s As String
Dim w() As String
Dim i As Integer, k As Integer
Dim x As Integer
Dim y As Integer
Dim DeineDatei As String
Const DeinTrennzeichen = ","
DeineDatei = "E:\privat\neue textdatei.txt"
Close
Open DeineDatei For Binary As #1
  s = Space(LOF(1))
  Get #1, , s
Close #1
's enthält die komplette Datei

y = UBound(Split(s, vbCrLf)) 'Zeilen
x = UBound(Split(Split(s, vbCrLf)(0), DeinTrennzeichen)) 'Spalten

ReDim w(0 To y, 0 To x)
For i = 0 To y
  For k = 0 To x
    w(i, k) = Split(Split(s, vbCrLf)(i), DeinTrennzeichen)(k)
Next k, i
'Ausgabe
ActiveSheet.Range(Cells(1, 1), Cells(y + 1, x + 1)) = w
End Sub 
PS: Rückmeldung wäre nett.
Anzeige
AS?
31.07.2005 20:38:24
MichaV
Hallo AS,
was los? Gefällt Dir der Code nicht? Kannst Du damit nix anfangen? Sonst bedankst Du Dich doch auch immer so artig. Über eine kleine Rückmeldung freue ich mich immer!
Gruß- Micha

Forumthreads zu verwandten Themen

Was bedeutet "If c=6 Then" ?
Josef_T

Hallo zusammen
kann mir mal bitte jemand erklären, was die Anweisung: "If c=6 Then" bewirkt?
Dim c
Select Case Target.Column
Case 19
Cancel = True
c = MsgBox("Mängel behoben ?", vbYesNo)
If c = 6 Then
Target.Value = Format(Now, "dd/mm/yy hh:mm") & " Mängel b...
09.09.2008 14:39:00
Thread-ID: 1008509
11 Beiträge
Anzeige
Was bedautet das ^ Zeichen in Formeln
Rocky

Hallo Excelfreunde,
bin jetzt des öffteren auf Formeln gestoßen die dieses Zeichen drin haben: ^
Was heißt das? und macht es?
Danke an alle
Gruß Rocky
25.11.2008 10:39:00
Thread-ID: 1027608
3 Beiträge
Teilstring "was " in Zelle suchen
Werner

VBA-Level: befriedigend
Hallo Freunde,
innerhalb einer Spalte sollen diejenigen Zellen markiert werden, die den Teilstring "was " (einschliesslich der Leerstelle) enthalten, aber nicht,
wenn "was " direkt auf "et" oder direkt auf "nd" folgt. Sinn ist, zwar den Teilstring "was " zu s...
06.04.2009 11:30:35
Thread-ID: 1067067
6 Beiträge
Was bedeutet das Zeichen "^" in Formeln
Merlin

Was bedeutet das Zeichen "^" in Formeln?
21.10.2009 10:45:46
Thread-ID: 1111008
6 Beiträge
Was bedeutet >>For colIndex
Dietmar

Hallo in die Abendrunde,
kann mir jemand diesen Code erklären? Es scheint ein AusleseCode zu sein, der das Sheet als Textdatei ausliest.
Ich will das zugrundeliegende Sheet neu gestalten.
Meine Frage:
Kann es sein dass der Code Daten ausliest, die farblich hinterlegt sind? Wenn...
01.07.2010 21:16:52
Thread-ID: 1165012
5 Beiträge
Frage zu "Dir$" - was bedeutet das $-Zeichen?
Martin

Hallo,
ich habe in einem Beitrag im Archiv (https://www.herber.de/forum/archiv/1068to1072/t1070551.htm) folgende Scheibweise beim Aufrufen der Dir-Funktion gelesen: Dir$
Welche Bedeutung hat das Dollar $-Zeichen?
Viele Grüße
Martin
15.01.2012 13:25:23
Thread-ID: 1246253
5 Beiträge
Anzeige
alles was links vom > erscheint löschen. - VBA
Wolfgang

Hallo,
ich würde gerne erreichen, dass in Tabelle3, Zelle G15 das Zeichen > (sofern es darin steht-ist nicht immer der Fall-) und alles was sich links davon befindet, gelöscht wird. Über Makrorekorder bekomme ich das irgendwie nicht hin. Danke schon jetzt für die Rückmeldungen.
Gru...
03.11.2012 11:59:32
Thread-ID: 1285072
4 Beiträge
Etwas für Profis...brauche ein...
luna

Hallo,
ich brauche ein Programm (oder VBA-Script), das folgendes ermöglicht: nach dem Start(Öffnen) soll es selbständig eine Verbindung zum Internet aufbauen, eine bestimmte Seite anwählen (z.B. www.Beispiel.de),etwas verweilen, und danach selbständig die Verbindung beenden. Dies soll sich m...
19.07.2002 16:26:53
Thread-ID: 138575
7 Beiträge
Alles was < 10 in nächstes Tabellenblatt
mattis

Hallo Forumsler.Ich habe folgende Aufgabe:In einer Tabelle sind in Spalte A sehr viele Einträge
und in Spalte B dazugehörige Funktionswerte.Wenn nun ein Wert in Spalte B kleiner als 10 ist
soll der Wert mit vorangestelltem Ausgangswert von
Spalte A in das zweite Tabellenblatt geschrieb...
23.07.2002 13:22:44
Thread-ID: 139434
5 Beiträge
Anzeige
SVERWEIS;INDEX;VERGLEICH;ODER;WAS;SOLL;ICH;TUEN?
rouven

Hallo Zusammen, ich weiß nicht mehr weiter, da ich immer wieder auf euer Forum stoße, hoffe ich das ihr mir weiter helfen könnt..... Ich wäre euch sehr dankbar weil ich schon ca. 10Std. aufgewendet habe diese DOOFE Funktion zum laufen zu kriegen. Zur Sache.
Aus einer Text Datei kann ich ent...
02.10.2015 21:07:48
Thread-ID: 1450573
8 Beiträge
Hinzufügen einer Zeile und etwas hineinkopieren
BAZZIE

Hallo Ihr!
Wisst ihr, wie ich mit VBA Excel sagen kann, dass er eine Zeile hinzufügen soll und dann 4 Werte aus 4 Spalten hin einkopieren soll.
wie programmiere ich das?Vielen Dank für eure Anworten!!
Bazzi
05.08.2002 14:52:20
Thread-ID: 144923
2 Beiträge
Anzeige
einzelne Spalten schützen aber trotzdem was einfüg
Martin

ha llo zusammen
ich hab eine tabelle in der ich gewisse spalten vor weiteren beschriftungen gechützt habe. nun möchte ich aber, dass ich via Macro trotzdem z.b. eine neue zeile einfügen kann. was ja nicht geht ohne den blatt schutz raus zu nehmen. gibts vielleicht ne elegantere lösung?vielen...
22.08.2002 10:39:56
Thread-ID: 151461
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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