Excel sorok másolásánál VBA hibakód

Excel sorok másolásánál VBA hibakód
2020-03-12T18:41:55+01:00
2020-04-13T08:17:25+02:00
2022-10-15T21:26:19+02:00
Rookarege
Sziasztok!

Egy Excelben az alábbi VBA kódsor kb. 2 éve gond nélkül működött, most viszont megáll 
application-definied or object definied error hibakóddal az utolsó előtti sornál
(megnevezések másolása):

Dim sor As Integer sor = Worksheets("Tar").Cells(3, 3).Value Worksheets("Tar").Range(Cells(sor, 27), Cells(sor, 77)).Copy 'sorszámok Worksheets("Ajanlat").Range("E20:E70").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True Worksheets("Tar").Range(Cells(sor, 131), Cells(sor, 181)).Copy 'megnevezések Worksheets("Ajanlat").Range("G20:G70").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
Annyi történt, hogy a másolandó területet átrendeztem és a fájlt átneveztem.

Van tippetek?
Köszönet előre is a segítségért.
Mutasd a teljes hozzászólást!
igy elsőre passz, jónak tűnik, de: 

Szerintem ha csak így adod meg: cells() akkor az aktuális worksheeten megy. 
Szerintem így add meg: 
Worksheets("Tar").Range(Worksheets("Tar").Cells(sor, 131), Worksheets("Tar").Cells(sor, 181)).Copy
azt tudom elképzeni, hogy valami frissítés miatt a pastespecial aktivvá is tette a sheetet.

egy másik tipp: 
nézd meg hogy nincsenek-e összevont cellák a másolandó területen. 
arra gondolok, hogy pl a cells(sor,181) tulajsonképpen a 181 és a 182.cellát is tartalmazza, és így egy nagyobb területet illeszt a kisebbikbe. 

ha kiiratod, hogy melyik "sor" amit érint a hiba, és ránézel akkor lehet hogy kapásból kiderül hogy mi van.  pl a "#"-os cellatartalmakkal ilyenkor simán lehet baj, azokon el szokott szállni a vba. 
(ha mondjuk egy hibás képlet van a sorban, ami simán lehet az átnevezések miatt)
jól belegondolva, majdnem biztos, hogy itt lesz a hiba. 

ha megosztod az xlst, akár ez egyszem hibás sorral, akkor ránézünk.
Mutasd a teljes hozzászólást!

Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd