Ansicht:   

#444406 Excel VBA Laufzeitfehler 91 (Objektvariable oder With-Blockvariable... (pc.sw.office)

verfaßt von manes zur Homepage von manes, Köln, 17.02.2021, 20:05:21

Hallo
> Alles unter den 10 wird nicht übertragen und auch aus der PayPal
> Aufbereiten raus gelöscht.
> Hab nicht den Part in deinem Code gefunden, der das verursacht.
In der Passage

With wsh_q
If .Range("A11") <> "" Then
letzte = .Range("A65536").End(xlUp).Row
.Range("A11:N" & letzten).Clear
End If
End With

wird geprüft.in welcher Zeile die letzte Eintragung in der Spalte A ist. Wenn von A11 abwärts nichts eingetragen ist, ist der Wert letzte = 10. Dementsprechend werden dann auch nur 10 Datensätze übertragen. So waren Deine Vorgaben!

Wenn Du möchtest, dass alles in den Spalten c bis f übertragen werden soll, dann vergiss die Variable letzte. In dem Fall müsstest Du vielmehr die kompletten Spalten übertragen, allerdings ohne die letzten 10 Zeilen, weil am Zielpunkt ja alles um 10 Zeilen nach unten versetzt eingefügt werden sollen.
M.a.W.
statt str_r = "#1:#" & letzte müsste es dann heißen
str_r = "#1:#" & 65526

Schaumerma, ob es so klappt.
Viel Erfolg
Manes

--
Also wenn ich ehrlich sein sollte, müsste ich lügen!

 

gesamter Thread:

Ansicht:   
Auf unserer Web-Seite werden Cookies eingesetzt, um diverse Funktionalitäten zu gewährleisten. Hier erfährst du alles zum Datenschutz