Macro copy/colle valeur sur la même feuille

[chimonito]

Bonjour à tous,

Quand on aime, on ne compte pas son temps, mais là j'avoue que les bugs me gonfle surtout quand je ne comprend pas.

Voilà mon problème, j'ai un tableau préformé par excel qui se nomme "tableau1". Mon tableau à les dimensions suivantes "=$A$8:$AE$10".

Sur la même feuille en ligne 7, j'ai des données qui apparaissent en fonction des formules de cellule de cette ligne.

Je souhaiterais trouvé une macro qui me permettent de faire un copier de ma ligne 7 (de A à AE) dans mon tableau (dernière ligne, celle juste avant "sous-totaux") mais biensure uniquement les valeurs, je ne veux plus les formules.

Pouvez vous m'aider, car avec le mode enregistrement du développeur, ce que j'ai marche mais bug pas mal ?

En vous remerciant

Ben

 

[Dranreb]

Bonsoir.
Ça va être une instruction du genre :

Feuil1.ListObjects("Tableau1").ListRows.Add.Range.Value = Feuil1.[A7:AE7].Value

Ou bien, s'il ne s'agit pas de créer la ligne mais de modifier la dernière :

With Feuil1.ListObjects("Tableau1").ListRows
   .Item(.Count).Range.Value = Feuil1.[A7:AE7].Value
   End With