Probleme AutoFill

[Will-e-coyote]

Bonjour le forum,

Voila mon souci :

Je veux inserer une ligne dans un tableau, tout en faisant en sorte que cette nouvelle ligne contienne une copie de l'ancienne première ligne. Pour ce faire, j'ai le code suivant :

ActiveSheet.Range(MyZone).Rows(1).EntireRow.Insert
ActiveSheet.Range(MyZone).Rows(2).AutoFill _
    Destination:=ActiveSheet.Range(MyZone).Rows(2).Resize(-1), Type:=xlFillCopy

Le problème est que la seconde ligne de code me retourne une erreur 1004. 😕

Pouvez-vous me dire ce qui cloche ?

Par avance Molto Gracias 😱

 

[Will-e-coyote]

Re : Probleme AutoFill

Bon, pas de réponse,...

En fait c'est le resize(-1) qu'il aime pas, je m'y suis pris autrement et ca roule

😛

Merci a tous les lecteurs de ce post