ich hab' den Ausdruck inzwischen nochmal umgestellt. Mit A1-Schreibweise klappt's hervorragend, mit Z1S1-Schreibweise leider nicht! Bei Ausführung des unten stehenden Codes erhalte ich immer Laufzeitfehler 450.
Sub test()
If Tabelle1.Cells(11, 6) = 5 Then
Workbooks("Mappe3").Sheets("Tabelle1").Range(Cells(11, 6), Cells(11, 8), Cells(11, 11), Cells(11, 15)).Copy _
Workbooks("Mappe4").Sheets("Tabelle3").Cells(14, 8)
End If
End Sub
vielleicht hat von Euch einer 'nen Tip?
Vielen Dank im voraus!
Rafael