Hallo Uwe,
die Zeile With ActiveSheet referenziert auf das aktive Blatt.
Wenn Du WIth Workbooks("abc").Sheets("Tabelle1") schreibst, wird der Code mit den Daten dieses Blattes ausgeführt, das ERgebnis erscheint auch in diesem Blatt. Die Datei "abc" sollte aber offen sein.
Wenn das Ergebnis nicht in "abc", sondern im aktiven Blatt erscheinen soll, wäre die Zeile
found.Offset(zeile, 0) = erg zu ersetzen durch Activesheet.Cells(1,1) = erg
wäre dann Zelle A1.
Wenn das micht reicht, müsstest Du etwas mehr mitteilen.
Gruß der AlteDresdner
|