Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
984to988
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
984to988
984to988
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datum aus TXT Datei auslesen

Datum aus TXT Datei auslesen
19.06.2008 09:32:00
Andre´
Hallo alle zusammen,
ich möchte aus einer TXT Datei die unter C:\Datum mit dem Namen "Datum.txt" gespeichert ist
das dritt vorletzte Datum (in dem Bsp. ist es der 15.06.2008) auslesen und in die Zelle A2 zurückgeben.
Hier ist der Aufbau der TXT Datei:

Die Datei https://www.herber.de/bbs/user/53196.txt wurde aus Datenschutzgründen gelöscht


Ich hoffe mir kann jemand helfen und bedanke mich im voraus!
MFG Andre

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum aus TXT Datei auslesen
19.06.2008 10:53:12
Beverly
Hi Ande,
hier eine Möglichkeit:

Sub einlesen()
Dim arrText()
Dim loZeile As Long
Open Pfad & "C:\Datum\Datum.txt" For Input As #1
Do While Not EOF(1)
ReDim Preserve arrText(loZeile)
Line Input #1, arrText(loZeile)
loZeile = loZeile + 1
Loop
Close #1
Range("A2") = DateValue(Left(arrText(UBound(arrText()) - 2), 10))
End Sub



AW: Datum aus TXT Datei auslesen
19.06.2008 11:13:27
Andre´
Hallo Karin,
erstmals Danke für deine Antwort.
Dein Code gibt doch die ersten 10 Zeichen aus der 3 letzten Zeile wieder. Ich möchte aber gern das 3 letzte Datum erhalten.
In der TXT Datei kommt das Datum mehrmals vor so wie in der Bsp. Datei angehängt.
Wenn das nicht gehen sollte kann man vielleicht alle Zeilen in Excel einlesen (nur die ersten 10 Zeichen) und dann alle doppelten löschen, dann könnte dein Lösungsansatz funktionieren wenn nicht mehr als 65536 Zeilen enthalten sind. Ich denke blos, dass das ziemlich lange dauern kann.
Hast du dafür vielleicht einen Ansatz oder eine andere Idee!
MFG Andre

Anzeige
AW: Datum aus TXT Datei auslesen
19.06.2008 11:35:00
UweD
Hallo
meinst du evtl. nicht das Datum aus der 3. letzten Zeile, sondern zeitlich gesehen das 3. größte Datum?
Gruß UweD

AW: Datum aus TXT Datei auslesen
19.06.2008 11:49:21
Beverly
Hi Andre,
versuche es so

Sub einlesen()
Dim arrText()
Dim loZeile As Long
Dim inZaehler As Integer
Open "C:\Datum\Datum.txt" For Input As #1
Do While Not EOF(1)
ReDim Preserve arrText(loZeile)
Line Input #1, arrText(loZeile)
loZeile = loZeile + 1
Loop
Close #1
For loZeile = UBound(arrText()) To 0 Step -1
If DateValue(Left(arrText(loZeile - 1), 10))



Anzeige
AW: Datum aus TXT Datei auslesen :-))
19.06.2008 11:57:33
Andre´
Hallo Karin,
genau so soll es sein.
Vielen DANKE, du hast mir damit sehr geholfen!!!.
MFG Andre

Noch eine Frage
19.06.2008 12:28:00
Andre´
Hallo Karin,
wenn angenommen nur ein Datum enthalten ist kommt eine Fehlermelung: Index außerhalb des gültigen Bereichs
Userbild
Kann man auch das abfangen.
MFG Andre

AW: Noch eine Frage
19.06.2008 13:05:45
Beverly
Hi Andre,
ändere diesen Teil so

Close #1
Select Case UBound(arrText())
Case Is  2
For loZeile = UBound(arrText()) To 0 Step -1
If DateValue(Left(arrText(loZeile - 1), 10))



Anzeige
Klappt prima:-)) Tausend mal DANKE oT.
19.06.2008 13:12:33
Andre´

184 Forumthreads zu ähnlichen Themen

Datum aus Tag, Jahr, KW auslesen
Stephan

Gibt es eine Möglichkeit das Datum auszulesen aus:
Mo = Montag
Jahr=2008
KW=1
Besten Dank
Stephan
16.08.2008 22:23:00
Thread-ID: 1002369
7 Beiträge
Anzeige
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
Uhrzeit als Text
Herbert

Hallo,
in meiner Tabelle in Zelle A1 steht das Datum und die Uhrzeit z.B. "14.10.2008 07:00".
Ich möchte in der Zelle B1, dass nur die Uhrzeit erscheint. Diese muss aber im Textformat hinterlegt sein.
Bin für jede Hilfe dankbar.
Gruß Herbert
15.10.2008 11:20:00
Thread-ID: 1016508
5 Beiträge
Anzeige
Datum aus Zelle auslesen im Dateinamen übernehmen
Ralf

Hallo Zusammen,
hab' ein kleines Problem:
Wie kann man ein in einer Zelle hinterlegtes Datum im Dateinamen übernehmen.
Gruß Ralf
13.03.2009 16:49:57
Thread-ID: 1059943
4 Beiträge
Datum aus Zelle auslesen im Dateinamen übernehmen
Ralf

Hallo Zusammen,
ich hab' immer noch mein kleines Problem, vielleicht weiß hier ja einer weiter?
Wie kann man ein in einer Zelle hinterlegtes Datum im Dateinamen übernehmen.
Gruß Ralf
18.03.2009 13:41:01
Thread-ID: 1061396
6 Beiträge
Einträge aus Textdatei extrahieren
Stefan

Hallo,
ich habe eine Textdatei, in der sich Email Adressen immer an einer Stelle finden, die so aufgebaut ist:
xxxxx@yahoo.de
Wie kann ich alle Email Adressen automatisiert aus dieser Datei auslesen?
Daaaanke
Stefan
31.03.2009 12:35:38
Thread-ID: 1065586
3 Beiträge
Datum und Uhrzeit aus Textbox passend in Tabelle e
Karsten

Hallo
Ich lese mit einer Userform ein Datum und eine Uhrzeit aus.
Wenn ich die wieder in die gleich Zelle schreiben lasse, werden sie nicht rechtsbündig sondern linksbündig gespeichert und nicht richtig "benutzt.
Wenn ich in der Zelle nur Enter drücke, wird das Datum und auch die Uh...
06.04.2009 19:01:58
Thread-ID: 1067159
3 Beiträge
Zeit aus kompletten Datum-String
Knobloch

Ich habe die Anforderung , aus einem von MS-QUERY erstellten XLS-File aus dem kompletten Datumsfeld (YYYY-MM-DD HH:MI:SS) nur die Zeit zu extrahieren und die Daten(wechselnde Anzahl) in der Folge nach Stunde,Minute,Sekunde zu sortieren. Bitte um Hilfe !
14.05.2009 08:30:56
Thread-ID: 1074980
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
9
3
4
2
3
5
2
2
4
2
4
3
3
8
10
2
8
2
3
8
2
2
3
3