Wert aus Tabelle A in offenen Tabellen suchen
28.10.2005 11:55:11
Uschi
ich habe eine Datei (Tabelle A) in die ich aus verschiedenen anderen Dateien (Tabellen123) Werte einlesen will. Das Makro müßte nun abgleichen, welcher Name in den Tabellen123 in "B1" steht und den Wert aus "E19" aus dieser Tabelle in Tabelle A in die Zeile mit dem gleichen Namen in Spalte B eintragen. Die Namensspalte in Tabelle A ist A:A.
Die verschiedenen Tabellen123 öffne ich mittels Makro aus Tabelle A heraus. Vielleicht kann man das neue Makro da irgendwie einbauen.
Sub in_master_uebernehmen()
Dim Datei1, Pfad As String
Pfad = InputBox("Pfad", Default:="C:\UK\Incentive\ \TL\")
Datei1 = Dir(Pfad & "*.xls")
Do While Datei1 <> ""
Workbooks.Open Filename:=Pfad & Datei1
Datei1 = Dir()
Loop
End Sub
Ich hoffe ich habe mich einigermaßen verständlich ausgedrückt und danke schon mal allen, die sich Gedanken zu meinem Problem machen.
Uschi