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

VBA Datei-Info importieren

Forumthread: VBA Datei-Info importieren

VBA Datei-Info importieren
09.08.2007 16:54:00
Peter
Ich habe folgendes Makro geschrieben, dass die Datei Artikel.txt als neues Blatt in Excel öffnet.

Sub TextDateiEinlesen()
Workbooks.OpenText Filename:="C:\Artikel.txt", _
DataType:=xlDelimited, Semicolon:=True
End Sub


Wie ist das Programm umzuschreiben, damit die Informationen von Artikel.txt direkt in ein existierendes Excel Blatt importiert werden, ohne dass ein neues Excel Blatt geöffnet wird?

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: VBA Datei-Info importieren
09.08.2007 21:46:00
Uduuh
Hallo,
das geht so:

Sub Text_lesen()
Dim intFree As Integer, vntTmp, strTmp As String, lngLast As Long
intFree = FreeFile
Open "C:\Artikel.txt" For Input As intFree
Do Until EOF(intFree)
Line Input #intFree, strTmp
vntTmp = Split(strTmp, ";")
With Sheets(1)
lngLast = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
.Range(.Cells(lngLast, 1), .Cells(lngLast, UBound(vntTmp))) = vntTmp
End With
Loop
Close #intFree
End Sub


Gruß aus’m Pott
Udo

Anzeige
AW: VBA Datei-Info importieren
10.08.2007 10:35:26
Peter
Hallo Udo,
Vielen Dank für deine Unterstützung.
Ich habe noch 2 kleine Ergänzungen.
1) Dein Programm schreibt die Daten der Artikel.txt beginnend mit der 2. Zeile. Wie muss das Programm geändert werden, damit die Daten beginnend mit der 1. Zeile ins Excel geschrieben werden?
2) Eine Zeile im Artikel.txt schaut so aus "Name; Soll; Ist; Differenz". D.h. hinter der Differenz steht kein ";" (Strichpunkt). Wenn ich nun dein Programm starte, do wird "Differenz" nicht ins Excel übertragen. Wie muss nun das Programm geändert werden, damit auch "Differenz" im Excel steht? Leider kann ich hinter "Differenz" keinen ";" anbringen.
Danke im Voraus.
Grüße
Peter
Anzeige
;

Forumthreads zu verwandten Themen

Kombinationsfelder mit Daten aus anderer Tabelle
Bernhard

Hallo liebe Freunde,
ich brauche wieder einmal Eure Hilfe beim Umstricken eines VBA Codes, den ich hier im Archiv gefunden habe.
Die Userform hat u.a. 2 Kombinationsfelder, die mit den Daten aus den Spalten B bzw. C gefüllt werden. Wenn ich die Auswahl in Kombi1 treffe, wird Kombi2 glei...
25.08.2008 15:48:18
Thread-ID: 1004492
8 Beiträge
Daten aus tmp-Datei importieren
Wolfgang

Hallo,
ich suche nach einer Möglichkeit, aus einer .tmp-Datei die wohl im Format *"?xml version="1.0" encoding="UTF-8"?*" geschrieben ist, Daten in Excel zu importieren. Über das übliche Verfahren "Daten importieren" bekomme ich das nicht hin. Hat evtl. jemand eine Idee, was ich da machen k...
09.09.2008 08:52:00
Thread-ID: 1008298
7 Beiträge
Anzeige
Laufende Nummer aus anderer Datei ziehen
mtremer

Hallo Excel-Freunde,
nun habe ich schon länger recherchiert, aber gefunden habe ich nichts :-(
Folgendes habe ich vor:
Ich befinde mich in einer Datei (Start.xls). Von dort aus möchte ich eine laufende Nummer aus einer anderen Datei (Sammlung.xls) ziehen. Diese Nummer befindet sich...
17.09.2008 11:55:00
Thread-ID: 1010315
4 Beiträge
Datenimport, Zahlen aus .txt Datei
Tom

Hallo zusammen,
benötige mal wieder Euer Fachwissen.
Es geht um eine .txt-Datei mit 100.000 Zahlen a 13 Stellen, diese möchte ich in Excel importieren.
Hierzu nutze ich in Excel Daten_ Externe Daten importieren, funktioniert auch gut, nur das nicht alle Zahlen in ein Tabelleblatt pa...
20.10.2008 19:30:14
Thread-ID: 1017788
2 Beiträge
Daten aus einer anderen xls Datei importieren
Michi

Hallo,
Ich suche eine VBA lösung (am besten als Macro) für folgende Aufgabe:
Es soll ein ein Report erstellt werden der wie folgt ausschauen soll (Daten (PO nummer + einzelne Summe)n kommen aus einer externen Datei):
Woche1
Datainut PO1234 500 Euro
Lager PM PO23456 800 E...
08.11.2008 13:02:47
Thread-ID: 1022899
2 Beiträge
Zeilen aus anderer datei kopieren
Dieter

Hi,
habe mal wieder ein schweres Problem:
ich möchte aus einer anderen Excel Date ein paar Zeilen kopieren. das Ganze soll folgendermassen funktionieren:
Quelldatei : "IMPORT.XLS
Tabellenblatt : "DATEN" oder "FPC"
Zieldatei : "EXPORT.XLS
Tabelnneblatt : "EINGABE"
so,...
01.12.2008 11:51:16
Thread-ID: 1029203
5 Beiträge
Anzeige
Import eines Arbeitsblatts aus anderer Excel-Datei
eliewsam

Hallo VBA-Experten,
ist es möglich, dass ich ausgehend von einer Excel-Datei ein einzelnes Arbeitsblatt einer anderen Excel-Datei importiere. Die Vergabe eines Namens für das neue (importierte) Arbeitsblatt sollte per Dialogfenster erfolgen.
Vielleicht kann mir einer von Euch in diesbez...
04.02.2009 09:06:29
Thread-ID: 1046879
4 Beiträge
Worksheet aus anderer Datei übernehmen
tco99

Hallo zusammen,
ich habe folgende Frage bzw. Bitte:
Ich habe zwei Excel-Dateien. Die eine Datei liegt immer im selben Verzeichnis, immer mit dem Namen "Daten" und hat ein einziges Worksheet mit dem Namen "Daten".
Jetzt müsste per Makro in der zweiten Datei das Blatt "Daten" der er...
05.02.2009 21:00:00
Thread-ID: 1047509
5 Beiträge
Anzeige
Formeln aus anderer Datei
Thorsten

Hallo zusammen,
ich hab ne Frage auf die ich im Forum keine Antwort finde.
Und zwar möchte ich in einer Excel-Datei formeln herunterziehen.
Jedoch bezieht sich die verknüpfung auf eine andere datei.
Dann geht das irgendwie nicht .
Und zwar steht in Zelle A1 von meiner Datei...
09.02.2009 10:55:56
Thread-ID: 1048583
3 Beiträge
importieren von Daten aus mehrer Mappen via VBA
Daten

Hallo Excelsperten,
an für sich ist das öffenen und importieren von Daten aus einer Arbeitsmappe via VBA kein Problem. Ich habe die Anforderung ein Tool zu schreiben das Daten aus Access graphisch analysiert. Bis hier hin ist alles noch ken Problem.
Die Daten aus Access werden abhängig...
10.02.2009 09:46:00
Thread-ID: 1048927
3 Beiträge
Worksheet aus anderer Excel Datei einbinden
Matze

Hallo zusammen!
Ich habe folgendes Vorhaben:
Ich möchte per CommandButton eine andere Excel Datei öffnen, aus dieser die einzelnen vorhandenen Worksheets (5 Stück) kopieren und diese anschließend in die Urpsungsdatei als Worksheet einbinden. Das Öffnen der anderen Excel Datei klappt, b...
26.02.2009 15:06:16
Thread-ID: 1054417
7 Beiträge
Anzeige
Bereichsnamen auslesen, in anderer Datei einlesen
Jörg

Hallo Forum,
ich lese meine vergebenen Bereichsnamen aus mit
Sub Namen_lesen_und_Bereich_angeben() For n = 1 To Names.Count Cells(n, 1) = Names(n).Name Cells(n, 2) = Names(n).Value Next n End Sub
Anschließend kopiere ich das Register in eine andere Datei und versuche dort die Be...
03.03.2009 15:46:37
Thread-ID: 1056016
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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