recopie d'une formule vers la droite par macro

[philmaure]

bonjour à tous,

comment modifier ma macro pour que la formule en A21 soit recopié vers la droite quelque soit la ligne sélectionnée puisque j'active la premiere cellule vide en colonne A?

Merci d'avance
Philippe

 

[Dranreb]

Re : recopie d'une formule vers la droite par macro

Bonjour.

Range("a65536").End(xlUp).Offset(1, 0).Resize(, 6).FormulaR1C1 = "=IF(R[-3]C<>R[-13]C,""Ajout"","""")"

...je suppose.
À+

 

[job75]

Re : recopie d'une formule vers la droite par macro

Bonjour philmaure,

Entrez la formule dans la plage :

ActiveCell.Resize(, 6).FormulaR1C1 = "=IF(R[-3]C<>R[-13]C,""Ajout"","""")"

Je vois que vous utilisez Select. C'est inutile...

Edit : salut Dranreb, très à la bourre moi !

A+

 

[philmaure]

Re : recopie d'une formule vers la droite par macro

Merci beaucoup, ca fontionne super.
Philippe