Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
320to324
320to324
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Textdatei mit mehr als 66536 Zeilen importieren

Forumthread: Textdatei mit mehr als 66536 Zeilen importieren

Textdatei mit mehr als 66536 Zeilen importieren
09.10.2003 18:14:42
Sönke
Hallo!

Ich habe folgendes Problem:
Eine Textdatei variabler Länge (aber eben immer mit mehr als 65536 Zeilen) soll in Excel importiert werden. Die OpenTextMethode usw. habe ich mir angeschaut und auch das Herber-Beispiel zum Textimport. So wirklich durchgestiegen bin ich aber nicht. Kann mir jemand vielleicht einen Beispielcode zeigen? Wichtig sind mir halt insbesondere die Variabilität bzgl. Dateilänge und das Aufteilen auf die Excel-Blätter.
Für jeden Tip wäre ich dankbar.

MFG

Sönke
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Vorschlag Access
09.10.2003 20:01:13
ChrisL
Hi Sönke

Denke zwar, dass man sowas schon mit Makros machen könnte, in der Recherche gibt es vermutlich auch Beispiele dazu, aber ich glaube, dass Access u.U. besser geeignet ist. Dort gibt es m.E. keine Beschränkung.

Gruss
Chris
AW: Textdatei mit mehr als 66536 Zeilen importiere
09.10.2003 20:28:26
Reinhard
Hi Sönke,
vielleicht nützt dir folgender Code etwas.
Es funktioniert, allerdings dauert es endlos.
Gruß
Reinhard

Option Explicit

Sub Datei200000Erzeugen()
'erzeugt Datei mit 200000 Zeilen
Dim n As Long
Open "c:\temp\D200000.txt" For Output As #1
For n = 1 To 200000
Print #1, n, "kjsfjöäo üokrki üri0ü0ßwvüov üi#ri#v püoipteiopterei#+reoü+oz"
Next n
Close #1
End Sub




Sub bigDateiEinlesen()
Application.ScreenUpdating = False
Dim BlattZähler As Integer
Dim ZeilenZähler  As Long
Dim Zeile As String
Open "c:\temp\D200000.txt" For Input As #1
Worksheets.Add.Move after:=Worksheets(Worksheets.Count)
Sheets(Worksheets.Count).Name = "txt-" & Worksheets.Count
ZeilenZähler = 0
While Not EOF(1)
ZeilenZähler = ZeilenZähler + 1
If ZeilenZähler = 65537 Then
Worksheets.Add.Move after:=Worksheets(Worksheets.Count)
Sheets(Worksheets.Count).Name = "txt-" & Worksheets.Count
ZeilenZähler = 1
End If
Input #1, Zeile
Cells(ZeilenZähler, 1).Value = Zeile
Wend
Close #1
Application.ScreenUpdating = True
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Verschiedene Werte in bestimmte Zahlen umwandeln
Henning

Hallo, ich versuche grade bei einem Schichtplan die Verschiedenen Zelleninhalte z.B. Zelle A3 Inhalt "U1",Zelle A4 Inhalt"1/3" usw. in Werte umzuwandeln und diese dann als Stunden ausrechennen zu lassen.
Also so soll z.B. aus dem Inhalt von Zelle A3, dort steht "U1" soll dann 8 Stunden ents...
15.10.2008 18:37:00
Thread-ID: 1016648
4 Beiträge
In Zahlen umwandeln
fuxl

Ich hab ein AutoOpen Makro in dem ich die Funktion TextinSpalten verwende um den Zelleninhalt in eine Zahl umzuwandeln und die kleinen Dreiecke los zu werden. Das ganze geschieht mit folgender Zeile:
'Tabelle1.Range("H15:H$" & letzteZeile).TextToColumns Destination:=Tabelle1.Range("H15"...
19.11.2008 11:13:06
Thread-ID: 1025937
5 Beiträge
Anzeige
Text in Zahlen umwandeln
u_hoernchen

Ich habe eine Spalte in Excel, in der vereinzelt Zellen sind, in denen Zahlen als Text formatiert sind. Da ich diese Zahlen für die weitere Verwendung als Werte haben muss und ich das dann relativ oft umfrickeln muss (ist leider ein Download aus einem Vorprogramm), frage ich mich, ob es ggf. ei...
26.11.2008 11:09:00
Thread-ID: 1027963
4 Beiträge
Anzeige
Werte in Zahlen umwandeln
Jakob

Hallo,
ich habe Daten aus SAP in Excel importiert. Die Werte in der Spalte "AQ" werden als Text importiert. Deshalb habe ich diese Werte mit "1" multipliziert um die Spalte ins Zahlenformat umzuwandeln. Ich habe dafür den folgenden Code mit dem Macrorecorder aufgezeichnet.
Range("BB...
12.05.2009 10:28:57
Thread-ID: 1074517
12 Beiträge
Dezimalzahl in FormulaR1C1
Mario

Hallo!
Ich würde gerne eine Formel mit einer Konstanten in mehrere Zelle schreiben.
Die Konstante kann eine Dezimalzahl sein. Hier mein Code
Dim Preis 'As Double
Dim Gewicht ' As Double
Dim i As Byte
'
Preis = 1245.5
Gewicht = 15.45
' Spalte A == Anzahl
F...
18.11.2009 11:29:28
Thread-ID: 1118243
8 Beiträge
Anzeige
CSV Import von mehr als 65536 Datensätze
mehr

Hallo Freunde,
ich habe irgendwo folgendes Script aufgegriffen, welches eigentlich tadellos funktioniert.
Leider benötige ich für die erste Spalte eine Textformatierung, da hier Artikelnr. mit Nullen voran stehen.
Beispiel 000500. Kann mir jemand helfen, habe mich schon selbst versu...
15.03.2010 17:00:34
Thread-ID: 1145987
4 Beiträge
Anzeige
Zeitraum zweier Daten in Zahlen umwandeln
BoB

Hallo zusammen,
ich bin noch nicht besonders versiert in Excel, aber ich möchte es werden:).
Wie kann ich den Zeitraum zwischen zwei Daten in Zahlen umwandeln. z.B. 11.07.2011 - 17.07.2011
Ich könnte natürlich das Anfangsdatum vom Enddatum subtrahieren, dann habe ich den Zeitraum vo...
12.07.2011 08:12:46
Thread-ID: 1221769
9 Beiträge
Textformat in Zahlenformat umwandeln
Robert

Hallo Forum,
an meinem Arbeitsplatz arbeite ich mit EXCEl 2003.
Eine entsprechende Datei lade ich für etliche externe Anwender auf einen externen gemeinsamen Server. Dort läuft ebenfalls EXcel 2003 - allerdings in einer Citrix-Umgebung.
Bei Daten, die ich auf den Server stelle, ver...
05.08.2011 19:34:29
Thread-ID: 1225093
3 Beiträge
Autofilter bei mehr als 65536 Zeilen
Michael

Hallo zusammen,
ich brauche mal eure Hilfe :)
Ich habe viele Maschinenstücklisten für verschiedene Kunden.
Diese würde ich nun gerne alle in eine Excelliste zusammenfahren um anschließend mit dem Autofilter arbeiten zu können. Hier findet ihr ein Beispiel: https://www.herber.de/bbs/...
06.03.2012 19:06:48
Thread-ID: 1253939
10 Beiträge
mit vba text in zahlen umwandeln
meixner

Hallo zusammen,
auf dem Datenblatt 6 möchte ich die Spalten L4:P100 in Zahlen umwandeln.
Habe schon einiges ausprobiert, aber nichts geht.
Kann mit jmd. einen Tip für das untere Makro geben?
Sub text_in_zahl() 'Dim LetzteZeile As Long 'Dim x As Long 'LetzteZeile = Range("J400")....
23.10.2012 10:08:34
Thread-ID: 1283381
12 Beiträge
Umrechnen Dezimalzahlen in Std. und Minuten
Emanuel Niklas

Wer weiß eine Lösung:
Möchte Stundenangaben in Dezimalzahlen mit Komma (z.B. 198,4 ) automatisch umrechnen und anzeigen lassen in Stunden und Minuten (z.B. 198:25)
30.06.2002 15:17:22
Thread-ID: 132510
3 Beiträge
Auswahl bie Autofilter und mehr als 65536 zeilen
yummi

Hallo zusammen,
ich habe folgendes Problem:
Ich habe ein oder mehrere Sheets gefüllt mit bis zu 1048576 zeilen. Nach Einstellen des Autofilter will ich die sichtbaren Zeilen markieren um mit diesen dann später weiter arbeiten zu können. Für die Version unter 65536 zeilen funktioniert es...
12.05.2014 13:42:45
Thread-ID: 1361112
26 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige