Problème avec AutoFill

Bonjour à tous,

Je viens vers vous car je sèche totalement sur une erreur 1004 autofill method of range class failed sur le code suivant :

Code:

---

1 2 3

'Descente des formules nbRows = Sheets(sheetsName).Range("A" & Rows.Count).End(xlUp).Row Sheets(sheetsName).Range("O4").AutoFill Destination:=Range("O4:O" & nbRows)

---

nbRows est bien égal au nombre de lignes avec valeur.

Je n'arrive pas à identifier mon erreur.

Quelqu'un aurait-il une idée ? Est-ce une erreur de lundi matin ?

Merci d'avance

A moins que ton Sheets(sheetsName) soit inutile, la source et la destination de l'AutoFill ne sont pas dans la même feuille. Ca ne peut donc pas fonctionner.

Du coup, erreur de lundi matin...

J'ai corrigé comme cela (je préfère expliciter la feuille) :

Code:

---

1 2 3

'Descente des formules nbRows = Sheets(sheetsName).Range("A" & Rows.Count).End(xlUp).Row Sheets(sheetsName).Range("O4").AutoFill Destination:=Sheets(sheetsName).Range("O4:O" & nbRows)

---

Merci Menhir.