Quote Originariamente inviato da AntonioG Visualizza il messaggio
Semplifica quella riga con tutti quegli oggetti range.
Anche perché se vale come per il VBA, la proprietà Range.Range non restituisce il Range in maniera assoluta, ma relativamente al Range esterno...

Credo sia sufficiente
RR=foglioExcel.Range("A1:O1").End(xlDown).Row
Ammesso e non concesso che in colonna A i dati siano continui e senza buchi. Altrimenti credo che l'End(xlDown) si fermi proprio come succede manualmente con la combinazione di tasti [CTRL+Freccia giù].