Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
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
1548to1552
1548to1552
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA für Dateiimport aus TXT nach Excel

Forumthread: VBA für Dateiimport aus TXT nach Excel

VBA für Dateiimport aus TXT nach Excel
25.03.2017 18:39:33
MichaelP
Hallo Zusammen
Ich möchte aus meiner Textdatei die Texte (Variabel mit oder ohne Zeilenumbruch) in Excel (Spalte A) importieren.
Das Trennzeichen ist dieses @-Zeichen.
Vom ersten @-Zeichen bis VOR dem nächsten @-Zeichen soll jeweils in eine Zeile usw. – beginnend von Zeile A1.
Hört sich einfach an – aber für mich kompliziert. Leider ist hier der TEXT-Datenimport von Excel nicht hilfreich, da er jede Leerzeile umbricht anstatt nur das @-Zeichen zu berücksichtigen ...
Mit besten Frühlingsgrüßen
MichaelP
Anzeige

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

Betreff
Datum
Anwender
Anzeige
Das kannst Du...
25.03.2017 22:03:24
Case
Hallo Michael, :-)
... so machen: ;-)
Option Explicit
Sub Main()
Dim varArr As Variant
Dim lngRow As Long
On Error GoTo Fin
Application.ScreenUpdating = False
varArr = Split(fncRF("C:\Temp\Test.txt"), "@")
For lngRow = LBound(varArr) To UBound(varArr)
Tabelle1.Range("A" & lngRow + 1).Value = Replace(varArr(lngRow), vbCrLf, "")
Next lngRow
Fin:
Application.ScreenUpdating = True
If Err.Number  0 Then MsgBox "Error: " & _
Err.Number & " " & Err.Description
End Sub
Public Function fncRF(ByVal strDatei As String) As String
Dim strInhalt As String
Dim intTMP As Integer
If Dir$(strDatei, vbNormal)  "" Then
intTMP = FreeFile
Open strDatei For Binary As #intTMP
strInhalt = Space$(LOF(intTMP))
Get #intTMP, , strInhalt
Close #intTMP
End If
fncRF = strInhalt
End Function
Servus
Case
Anzeige
AW: Das kannst Du...
26.03.2017 10:28:29
MichaelP
Hallo Case :-)
danke für Deine Hilfe.
Ich wünsche Dir einen schönen Sonntag
MichaelP
Wenn die Textdatei...
26.03.2017 11:40:59
Case
Hallo, :-)
... sehr viele Zeilen enthält, dann ist es besser es nicht über den einzelnen Zellzugriff zu lösen, sondern über ein Array und das dann auf einen Rutsch in die Tabelle zu schreiben.
Servus
Case
Anzeige
;

Forumthreads zu verwandten Themen

vba-Datenexport nach Excel2007 -Array mit 70000 DS
Tim

Hallo,
ich habe einen Datenexport aus einem Programm nach Excel in vba. Das ganze funktioniert soweit ganz gut.
Nun möchte ich jedoch nicht, das sjede Zeile aus meinem Programm exportiert wird, daher gibt es ein Array mit entsprechenden Datensätzen: Entweder eine 1 (steht für Export der...
20.08.2008 08:57:00
Thread-ID: 1003084
2 Beiträge
VBA-Code - Datei speichern unter; Schleife
Schulze

Halli Hallo,
ich habe eine kurze frage. und war geht es darum, dass die spalte a untersucht werden sollen. es sollen alle werte der tabelle (zeilen) kopiert werden, bis in der spalte a der wert 0 ist.
Im Folgenden habe ich eine Beispieldatei drangehangen. https://www.herber.de/bbs/user/...
21.08.2008 10:57:00
Thread-ID: 1003407
2 Beiträge
Excel: per VBA Kopieren, Quelldatenlöschen
Bolle

Hallo, Ich bin zwar ein alter Sack, aber neu hier.
Meine Frage:
In Spalte C2 bis H100 habe ich Datensätze weche Ich durch Doppelklick auf Zelle
(z.B. C33) die Zeile C bis H nach K5:P5 kopieren möchte. Danach sollten die kopierten
Zellen gelöscht werden. Durch nachrücken der u...
23.08.2008 14:14:40
Thread-ID: 1004109
3 Beiträge
Abgleichen von Daten per VBA
Daten

Hallo Forum,
ich möchte gerne Daten von einem Tabellenblatt (Hilfstabelle) in eine anderes Tabellenblatt (Terminierung) überrtagen. Hierbei soll das Makro schauen, ob der Datensatz schon vorhanden ist.
Wenn ja, dann sollen die Spalten aktualisiert werden.
Wenn nicht, dann sollen...
09.09.2008 10:34:00
Thread-ID: 1008354
5 Beiträge
Vergleich von Daten per VBA
Daten

Hallo Forum,
ich habe gestern nette Hilfe bezüglich eines VBA Problems erhalten.
Bei der Testdatei funktionierte das Makro dann auch prima, in der Originaldatei nicht. Ich habe es angepaßt, weiß aber nun nicht, wo der Fehler in der Syntax liegt.
Problem:
Das Makro verschrei...
10.09.2008 08:48:00
Thread-ID: 1008629
3 Beiträge
Leseschutz für Datei, mit VBA aufheben
Iro

Hallo,
folgendes Problem: ich will zwischen zwei Dateien Daten austauschen. Die A-datei soll grundsätzlich PW-geschützt werden, und zwar so, dass der User weder etwas verändern kann noch sie überhaupt öffnen. Nur wenn der User aus der B-datei mit der vorgesehenen Form Daten überträgt, soll...
21.10.2008 14:18:57
Thread-ID: 1017997
4 Beiträge
VBA DateFormat zu String convertieren
MBorn

Guten Morgen,
weiß jemand, wie man ein Datum, das im DateFormat (als Zahl) vorliegt
in das Textformat (yyyy-mm-dd) konvertiert. Sodaß das Ergebnis ein Text ist?
sodaß beispielsweise aus der Zahl 39868 das Text-Datum "2009-02-24" wird?
Herzlichen Dank,
Born
18.03.2009 12:59:43
Thread-ID: 1061376
12 Beiträge
Anzeige
VBA: Erste Seite einer Datei nicht mitdrucken
Jonathan

Hallo zusammen,
ich habe folgendes Problem, welches mittels eines Makros gelöst werden muss:
Ich möchte in eine Datei ein Makro einbauen, welches verhindert, dass die erste Seite mitgedruckt wird.
Das Makro sollte nach dem klick auf die Druckfunktion starten.
Da die Datei späte...
17.04.2009 11:15:57
Thread-ID: 1069277
5 Beiträge
VBA-Makro zum Datenübertrag zwischen Excel-Sheets
mctapt

Liebe VBA-Freunde,
ich muss auf der Arbeit ein Marko programmieren, mit dem sich Inhalte eines Sheets automatische beim öffnen der Datei in ein anderes übertragen lassen.
Die Idee íst dahinter:
Mein Chef will als Kontrolle der Berater sehen, mit wem sie so innerhalb der Woche te...
29.06.2009 21:19:08
Thread-ID: 1085193
7 Beiträge
Anzeige
VBA-Datenmaske Änderungen speichern
Kay

Hi, habe folgendes Problem und komme einfach nicht weiter und versteh es nicht.
Habe eine Userform, in der einige Daten zu einem Kunden erfasst werden und in einer Tabelle hinterlegt werden. Das läuft super ! Aber nun möchte ich mit einer 2'ten Userform die Daten auch bearbeiten lassen.
...
03.07.2009 09:58:18
Thread-ID: 1086101
3 Beiträge
VBA-Exceldatei unter Excel 2003 und 2007 nutzen
Martin

Hallo,
ich mache mir den Umstieg von Excel 2003 auf 2007 ziemlich schwer, will aber den Anschluss nicht verpassen und daher auf einem PC gerne unter Excel 2007 arbeiten.
Meine Frage: Ich arbeite sehr intensiv mit einer Exceldatei, in der es zahlreiche benutzerdefinierte über VBA erzeugt...
14.07.2009 12:29:24
Thread-ID: 1088399
5 Beiträge
VBA-Datenübernahme schlägt fehl
Sascha

Hallo liebe Excel-Profis,
in einer Datenbank nutze ich zum Auflisten aller gespeicherten Datensätze folgenden VBA-COde:
Private Sub Worksheet_Activate() 'Zielblatt muss immer die höchste Nr. haben! Dim i As Long Dim j As Long On Error GoTo Fehler Application.EnableEvents = False Applica...
12.09.2009 20:02:16
Thread-ID: 1102222
3 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