Wieso funktioniert folgender Code nicht (anwendungs- oder objektdefinierter fehler):
For Each ws In ThisWorkbook.Worksheets
...
ws.Range(Cells(i, j), Cells(i + k, j)).Merge
Next ws
nur Range(Cells(i, j), Cells(i + k, j)).Merge ist kein problem, verbindet die Zellen allerdings in der Tabelle, von der aus der Code aufgerufen wird.
ActiveWorksheet.Range(...).Merge
geht auch, allerdings nicht, wenn ich das akrive Worksheets vorher ändere:
ws.Activate
ActiveWorksheet.Range(...).Merge
Kann mir jemand erklären, woran das liegt? Ich möchte doch eigentlich nur die Range-Methode auf ein anderes Worksheet anwenden.
mfg, Martin