07.11.2018, 14:26 (Dieser Beitrag wurde zuletzt bearbeitet: 19.12.2018, 20:38 von Kuwer.
Bearbeitungsgrund: Betreff berichtigt
)
Hallo,
Wollte mal fragen ob ein Macro mir dies hier ermöglichen kann
Hab eine Excel Datei mit einer Datenbank wo Identifikationensnummern von Personen drin stehn (jede einzelne ID gibt es nur einmal) doch die ID kann in Spalte B oder G stehn mit dem Vornamen, Nachnamen und Adresse der Personen.
Wenn ich nun in der zweiten Datei die ID Nummer eingebe sollte das Makro die in Datei 1 suchen gehn und mir die Felder mit den Daten aus Datei 1 ausfüllen d.h. Vorname Nachname und Adresse...
benenne die Datei mit dem Sheet "Identifikation" um in "Patrick 2_1" und die Datei für die neue Liste in "Patrick 2_2". Dann teste diesen Code:
Code:
Sub T_1()
Dim WS As Worksheet: Set WS = Workbooks("Patrick 2_2.xlsx").Sheets(1)
Do
i = i + 1
Loop Until WS.Cells(i, 2) = ""
Z = i
With Workbooks("Patrick 2_1.xlsx").Sheets(1)
i = 1
Do
i = i + 1
Loop Until .Cells(i, 1) = ""
lr = i
For i = 3 To lr
ID = IIf(IsEmpty(.Cells(i, 2)), .Cells(i, 7), .Cells(i, 2))
If ID <> "" Then WS.Cells(Z, 2).End(xlUp).Offset(1) = ID: Z = Z + 1
Next i
End With
End Sub
Danach sollte in Spalte 2 der Zieltabelle alle Identifikationscode stehen. Das Füllen der anderen Spalten sollte mit "=SVerweis()" gehen.
Sorry aber ich bekomme sofort eine Fehlermeldung muss ja die Datei mit dem Makro in *.xlsm umwandeln und im Makro den richtigen Pfad der Datei eintragen
Jetzt funktionniert es d.h. die andere Datei muss offen sein so dass das Ganze funktionniert mit dem "=SVerweis()" hab ich noch nie gearbeitet geht das nicht zusammen mit dem Makro?
Leider muss ich sagen dass ich das Ganze ein bisschen anders dachte und zwuar so dass wenn ich in der zweiten Datei verschiedene ID Nummern eingebe und ich dann die zusätzlichen Daten hinter die jeweiligen ID Nummern haben will dass er sie erst dann per Makro suchen geht! Nicht wie jetzt dass sämtliche ID Nummern aus der Datenbank übertragen werden nur die die ich in Sapalte B eingegeben hab und er dann in die einzelnen Daten der Personen in der Datenbank suchen geht
in der Zieltabelle fehlt der Wohnort: soll der in Spalte E oder J?
Da die Spalten in beiden Listen völlig unterschiedlich sind, muss eine Zuordnung programmiert werden, kein Problem aber die Abstimmung ist recht müsam.
