Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Daten aus bestimmten dateien auslesen

Daten aus bestimmten dateien auslesen
30.11.2018 12:52:40
Illeana
Hallo zusammen :)
ich habe folgendes Problem
Ich möchte in ein bestehendes Template,(Grundlage), in Spalte B Daten, eine Materialnummer, aus einer bestimmten Datei (Material),xlsx format, einlesen.
Der zweite Schritt ist, eine zweite Datei auszulesen,xml Format, die zu den Materialnummern, in dem Grundlage Template, andere Daten in die weiteren Spalten des Templates einspielen soll.
Kann mir da jemand vielleicht weiterhelfen?

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten aus bestimmten dateien auslesen
06.12.2018 15:17:38
fcs
Hallo Ileana,
hier mal ein Ansatz, wobei ich mir nicht sicher bin, ob das bei xml-Dateien auch so funktioniert.
LG
Franz
Sub prcDaten_Material_einlesen()
Dim wkbZiel As Workbook
Dim wkbQuelle As Workbook
Dim wksZiel As Worksheet
Dim wksQuelle As Worksheet
Dim varMat As Variant
Dim Zei_Z As Long, Zei_Z1 As Long, Zei_Z2 As Long
Dim Zei_Q As Long, Zei_Q1 As Long, Zei_Q2 As Long
Dim rngFound As Range
Dim SpaMat_Z As Long, SpaMat_Q As Long
Dim varDatei As Variant
Dim StatusCalc As Long
Set wkbZiel = ActiveWorkbook 'Template Grundlagen
Set wksZiel = wkbZiel.Worksheets("Grundlage")   'Name ggf. anpassen
'Makrobremsen lösen
With Application
StatusCalc = .Calculation
.Calculation = xlCalculationManual
.ScreenUpdating = False
End With
With wksZiel
SpaMat_Z = 2 'Spalte B - Spalte in die Material-nr. eingetragen werden soll
'nächste Freie Zeile in der Spalte mit materialnummern
Zei_Z = .Cells(.Rows.Count, SpaMat_Z).End(xlUp).Row + 1
If Zei_Z 

Anzeige

352 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige