Wie kann ich mit dem u.a. Code mehrere Zellen auf ein anderes Tabellenblatt übertragen.
Ich habe zum übertragen B17, C17, D17, E17, F17 und G17.....
diese sollen in die Zellen B11, B12, B13, B14, B15 und B16.
Danke für Euer Hilfe
chris
Sub Polynator()
Sheets("Tabelle8").Range("B11").Value = Sheets("Tabelle3").Range("B17").Value
End Sub