|
Hi Sino,
ja, irgendwie läuft der Code so nicht, ich habe das Problem nun umgangen, so funktionierts:
zeile = Sheets("Neuwagen").Cells(rangeobj.Row, 1).Row
spalte = Sheets("Neuwagen").Cells(1, rangeobj.Column).Column
zeile2 = Sheets("ersatz").Cells(rangeobj2.Row, 1).Row
spalte2 = Sheets("ersatz").Cells(1, rangeobj2.Column).Column
Dazu muss man allerdings sagen, dass Deine Suchanfragen beide in demselben Dokument suchen, was meiner Einschätzung nach keinen Sinn hat. Aber das musst Du dann wissen :-D
lg Y
|