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

Zeile aus Textdatei

Forumthread: Zeile aus Textdatei

Zeile aus Textdatei
17.02.2007 10:17:12
Tino
Hallo,
vieleicht könnt ihr mir helfen.
möchte aus einer ziemlich großen anzahl (größer 1800) von Textdateien eine bestimmte Zeile lesen!
Nun meine Frage ist es möglich, wenn mir die Zeilennummer bekannt ist, diese direkt auszulesen
ohne jedesmal die komplette Textdatei einzulesen (dauert mir zu lang)?
Könnt Ihr mir Helfen? Danke im vorraus!
MfG
Tino
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile aus Textdatei
17.02.2007 10:53:00
Oberschlumpf
Hi Tino
Meines Wissens funzt das direkte Zeilenauslesen nur dann, wenn deine txt-Datei die Struktur einer Datenbank hat.
Das heißt also feste Spaltenbreite.
In diesem Fall könntest du mit

Open "datei.txt" For Random As #1 Len zeilenlänge
Get #1,zeilennummer

(genaue Syntax ist mir gerad nicht bekannt - müsste ich auch erst mal wieder nachlesen)
auf den gewünschten Datensatz (Zeile) zugreifen.
Wenn es sich aber in der txt-Datei um Fließtext handelt, dann geht es nur mit

Open "datei.txt" For Input As #1
Do While Not Eof(1)
Line Input #1, zeile
If InStr(1,zeile,"Suchtext") > 0 Then
'hier der Code, der bei Finden deiner Zeile ausgeführt werden soll
Close 'wenn nach Finden der Zeile nichts weiter geschehen soll
Exit Sub 'wenn nach Finden der Zeile nichts weiter geschehen soll
End If
Loop
Close

Konnte ich helfen?
Ciao
Thorsten
Anzeige
AW: Zeile aus Textdatei
17.02.2007 11:08:47
Cardexperte
Hallo Tino,
so sollte es gehen, es wird immer die 5. Zeile ausgelesen und in Zelle a1 gechrieben:

Sub cmdlesen()
Dim dateiname As String, Dateinr As Integer
Dim temp As String
dateiname = "test.Asc"
Dateinr = FreeFile
Open dateiname For Input As Dateinr
Do While Not EOF(Dateinr)
Line Input #Dateinr, temp
i = i + 1
If i = 5 Then Cells(1, 1).Value = temp
Loop
Close Dateinr
End Sub

dies kann man natürlich so ausbauen, dass alle z.B. ASC in einem Verzeichnis ausgelesen werden und dann nacheinander ins Excelblatt geschrieben werden.
Gruss Ws
Anzeige
AW: Zeile aus Textdatei
17.02.2007 11:24:00
Tino
Hallo Oberschlumpf u. Ws,
Danke erstmal für Eure schnelle Antwort.
Werde Eure Versionen mal Testen, ob diese den gewünschten erfolg für mich haben.
Werde Rückmeldung geben.
Danke
Tino
;

Forumthreads zu verwandten Themen

Inhalt einer Zelle im Windows Infobereich anzeigen
Thomas

Hallo,
kann ich den Inhalt einer Zelle im Windows Infobereich anzeigen lassen?
Ich habe eine VBA-Anwendung, die mir den Verarbeitungsstatus in einer Zelle anzeigt.
Weil die Verarbeitung sehr lange dauert möchte ich zwischendurch mit anderen Anwendungen arbeiten und unten rechts nebe...
27.08.2008 17:50:23
Thread-ID: 1005163
3 Beiträge
Textinhalte aus Zellen zusammenkopieren
zehetner

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
21.09.2008 18:29:25
Thread-ID: 1011343
2 Beiträge
Text (Datum) aus Zeile mit Zeilenbruch auslesen
Iro

Hallo,
ih habe folgendes Problem: ich muss aus einem vorgegebenen Sheet einen bestimmten Zinssatz zu einem bestimmten (Jahr / Monat) auslesen.
1. Problem: das vorgegebene, gesuchte Datum hat das Format TT.MM.JJJJ, das andere Datum, mit dem ich es vergleichen muss wird mit "Monat Jahr"....
01.10.2008 23:00:06
Thread-ID: 1013778
4 Beiträge
Anzeige
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge
Anzeige
Inhalt einer Zelle in anderer Zelle als Formel
Elias

Guten Morgen,
ich bin auf der Suche nach einer Lösung für folgenden Sachverhalt.
In einer Tabelle wird aus dem Inhalt verschiedener Zellen über Verketten eine Zeichenfolge gebildet, die in einer anderen Tabelle als Formel herhalten soll.
(Kurzes) Beispiel, das Original ist furchtbar...
11.01.2009 06:01:22
Thread-ID: 1038572
6 Beiträge
Text in Fußzeile aus Zelle ziehen
Sandra

Hallo zusammen!
Ich brauche mal wieder Eure Hilfe.
Meine Exceltabelle (ein Protokoll) soll im linken Teil der Fußzeile einen Text bekommen, der automatisch aus einer Zelle gezogen wird. So das sich die Fußzeile immer aktualisiert, wenn die Zelle geändert wird. Mit einer Formel geht es j...
29.01.2009 11:29:24
Thread-ID: 1044904
23 Beiträge
Anzeige
Zufällig einen Text ausgeben aus best. Zellen
Eddie

Hallo und Guten Abend.... habe mal wieder ein Problem...
Ich will gerne aus einer Anzahl von zellen (ca 100 Zeilen) .. wo bestimmte Sätze drin stehen diese Zufällig in einer Bestimmten zelle anzeigen lassen ....
Vielleicht hat ja jemand schon sowas gemacht ?
thx schon einmal
G...
15.02.2009 20:14:00
Thread-ID: 1050974
7 Beiträge
Anzeige
Inhalt einer Zelle in mehrere Zellen aufsplitten
Joerschi

Hallo liebe Excel-Community,
ich möchte den Inhalt einer Zelle (getrennt durch Leerzeichen) in andere Zellen aufsplitten bzw. in anderen Zellen getrennt anzeigen lassen. Die Leerzeichen aus der Herkunftszelle sollen dabei ignoriert werden.
Z. B. steht in Zelle A1: "1 2 3 4 5"
Jetzt...
04.03.2009 11:46:03
Thread-ID: 1056268
9 Beiträge
Bestimmten Inhalt einer Zelle in Textbox
Mone

Hallo Ihr Experten!
Ich bin am Verzweifeln....suche nach einer Möglichkeit mit VBA aus einer Zelle (A6) einen Teil aus dieser Zelle in eine Textbox zu manövrieren. Also in A6 steht z.B. 1234 Musterstadt. Ich muss nun die PLZ in eine separate Textbox einlesen als auch den Ort. Habe da mittel...
04.03.2009 23:39:53
Thread-ID: 1056628
4 Beiträge
Zugriff auf auf Teilinhalte einer Zelle
Der

Hallo da Draußen!
Habe mal wieder ein Problem mit meiner VBA Programmierung. Ich möchte innerhalb einer Exceltabelle auf einzelne Zellen zugreifen, die ein bestimmtes Merkmal haben. Der Inhalt der Zelle beginnt mit einer Zahl (in diesem fall mit einer Postleitzahl). Ich möchte also meine Ab...
20.03.2009 14:52:09
Thread-ID: 1062230
5 Beiträge
Teilinhalte aus Zellen löschen
Der

Hallo da draußen,
ich möchte aus einer Zelle die ersten x Zeichen von links löschen und die Restlichen beibehalten. Mit dem Befehl left(cells(R,C),x) kann ich auf diese Zeichen zugreifen und sie auch auslesen. Wie kann ich sie nun löschen?
Danke für Eure Hilfe!
Grüße aus der Hauptst...
25.03.2009 15:20:24
Thread-ID: 1063841
9 Beiträge
'Inhalt'/Typ einer Zelle bestimmen
TommiH

Hallöchen,
gibt es eine einfache Methode bei einer Zelle zu bestimmen, ob der Inhalt eine Zahl ist oder nicht?
Ich habe eine Zelle über die ich nicht weiss was drin steht, aber wenn eine Zahl drin steht, muss diese um 1 erhöht und einer anderen Zelle zugewiesen werde. Wenn es keine Zahl...
27.03.2009 14:17:52
Thread-ID: 1064625
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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