ich habe jetzt ein Makro geschrieben was mir eine Datei öffnet...
Sub test()
Dim Datei As String
Dim Verzeichnis As String
Datei = Cells(2, 2)
Verzeichnis = Cells(2, 1)
Workbooks.Open Verzeichnis & "\" & Datei, ReadOnly:=True
ActiveWorkbook.Close SaveChanges:=False
End Sub
Jetzt müsste ich in dieser geöffneten Datei einen Begriff ("Distanz Lehrenmaß") in Spalte A suchen und wenn er den Begriff findet, dann den Wert in Spalte B kopieren in eine andere Tabelle (z.B. Zusammenfassung)
Ich hoffe Ihr könnt mir helfen :)
Gruß Alex