copy de formule, astuce

rafmix

XLDnaute Nouveau
Bonjour à tous, j'avais réussi à faire un enregistrement d'une macro pour récupérer une formule, j'y arrive plus et j'en ai un tas à faire, je m'explique :

je faisais l'enregistrement et dans la macro j'obtenais des choses de ce type :

Worksheets("Verbatim Sheet").Range("H4:h6002").FormulaR1C1 = _
"=IF(RC[-1]<>"""",CONCATENATE(R1C7,"" "",RC[-6],"" "",RC[-5],"" "",RC[-4],"" "",RC[-3],"" "",RC[-2]),"""")"

la formule est en clair et en général je l'incorporait dans mon projet juste en changent le range, le worksheets... c'était bien pratique


maintenant quand je penses faire la même opération, j'obtient :
Range("A4:AR4").Select
Selection.Copy
Range("A5:AR5").Select
Range("AR5").Activate
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

je n'ai plus les formules en clair...

si qq a une idée, d'avance merci, en espérant avoir été un minimum clair dans mes propos...

Bonne journée à tous
 

Dull

XLDnaute Barbatruc
Re : copy de formule, astuce

Salut ramfix, le Forum

Je ne pense pas que tu ai fait la même chose

dans le Premier cas tu a déclencher l'enregistreur de macro et tu à écris la formule à la main

dans le deuxième cas tu ne fait qu'un simple Copié-Collé

Bonne Journée
 

Discussions similaires

Réponses
3
Affichages
607

Statistiques des forums

Discussions
312 495
Messages
2 088 964
Membres
103 992
dernier inscrit
Christine 974