@mox: Das mit RegEx interpretiere ich als dezenten Hinweis, dass es dem TE gerade alles zuviel wird.
@GustavGiftig: Ok, dann Schritt für Schritt. Ich verarbeite den sinnvollen Hinweis von petaod aus Post#15:
Starte VB2010, Neues Projekt, Konsolenanwendung auswählen, [OK]
Packe nun meinen Code aus Post#6 im Gesamten unter das
Das wär die Visual Studio-Variante zum Reinschreiben in eine TXT-Datei.
Eierlein hat ja in Post#16 schon passenden Excel-VBA-Code geschrieben. Hat Dir der gereicht?
@GustavGiftig: Ok, dann Schritt für Schritt. Ich verarbeite den sinnvollen Hinweis von petaod aus Post#15:
Starte VB2010, Neues Projekt, Konsolenanwendung auswählen, [OK]
Packe nun meinen Code aus Post#6 im Gesamten unter das
Sub Main (...) End Sub
. Dann noch den Code aus Post#8 in die Prozedur Main rein, die Parameter (Dateipfad, Anfangstext, Endtext) korrigieren und F5 drücken, um das durchlaufen zu lassen. Als Zusammenfassung:VB.NET-Quellcode
- Module Module1
- Sub Main()
- Dim TextLines = GetLinesFromFile("C:\Users\GustavGiftig\Desktop\Input.txt", "_ANFANG_", "_ENDE_")
- IO.File.WriteAllLines("C:\Users\GustavGiftig\Desktop\Output.txt", TextLines)
- End Sub
- Private Function GetLinesFromFile(FilePath As String, StartText As String, EndText As String) As IEnumerable(Of String)
- If Not IO.File.Exists(FilePath) Then Return Nothing
- Dim TextLineList As New List(Of String)
- Dim SaveTextLines = False
- For Each TextLine In IO.File.ReadAllLines(FilePath)
- If TextLine = StartText Then
- SaveTextLines = True
- Continue For
- End If
- If TextLine = EndText Then Exit For
- If SaveTextLines Then TextLineList.Add(TextLine)
- Next
- Return TextLineList
- End Function
- End Module
Das wär die Visual Studio-Variante zum Reinschreiben in eine TXT-Datei.
Eierlein hat ja in Post#16 schon passenden Excel-VBA-Code geschrieben. Hat Dir der gereicht?
Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.
Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.
Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „VaporiZed“ ()