Ich wende mich mal wieder an die Experten, welche mir bislang gut geholfen haben.
Seit 2 Tagen erhalte ich folgende Fehlermeldung bei einem Makro, welches seit 6 Monaten problemlos lief:
'Laufzeitfehler '1004: Die Methode 'Cells' für das Objekt '_Global' ist fehlgeschlagen.
Der Debugger bleibt in folgender Zeile stehen:
r = Cells(65536, 2).End(xlUp).Row
Hier das Makro:
'gasoil 10 ppm
With Worksheets("Basics")
Range(.Cells(2, 1), .Cells(2, 4)).Copy
.Cells(4, 1).PasteSpecial Paste:=xlFormats
r = Cells(65536, 2).End(xlUp).Row
.Cells(4, 1) = Cells(r, 1).Value
.Cells(4, 2) = Cells(r, 6).Value
.Cells(4, 3) = Cells(r, 7).Value
.Cells(4, 4) = Cells(r, 9).Value
'prem unl
.Cells(4, 10) = Cells(r, 1).Value
.Cells(4, 11) = Cells(r, 26).Value
.Cells(4, 12) = Cells(r, 27).Value
.Cells(4, 13) = Cells(r, 29).Value
'gasoil 0.2
.Cells(4, 19) = Cells(r, 1).Value
.Cells(4, 20) = Cells(r, 46).Value
.Cells(4, 21) = Cells(r, 47).Value
.Cells(4, 22) = Cells(r, 49).Value

.Cells(2, 1).EntireRow.Delete
End With
Bitte um den Rat der Experten. Vielen Dank für die Mühe!
Grüße
Roman