Macro pour mise à jour formules
Bonjour,
Est ce que vous pouvez m'aider à trouver une macro qui me fait ce job ( que je fais actuellement manuellement sur mes fichiers ):
Copier les formules ( D1;E1)
les coller sur (D3;E7). ( jusqu'a la ligne ou s’arrête ma base de donné pas forcement la ligne 7.
Puis recopier (D3;E7) et coller valeur '' mon fichier de travail est lourd quand il y a trop de formules il rame ): c'est pour ça que je ne veut pas garder les formules.
Sachant que mon soucis. c'est que à chaque fois que j'actualise ma base de donnée ( A2;C7)
Cette dernière ne s’arrête pas tout les jours à la ligne 7. elle peut s’arrêter à la ligne 3 comme à la ligne 3000.
Dsl je ne sais pas si j'ai été suffisamment claire.
Merci d'avance
Bonjour Sou14,
à tester,
Sub formule_Copy_Transfert()
Dim sh1, sh2, LastRw As Long
Set sh1 = Sheets("Foglio1")
Set sh2 = Sheets("Foglio3")
LastRw = sh1.Cells(Rows.Count, 1).End(xlUp).Row
sh1.Range("D1:E1").Copy sh1.Range("D3:E" & LastRw)
sh2.Range("D3:E" & LastRw).Value = sh1.Range("D3:E" & LastRw).Value
End SubJ'ai testé sur mon fichier, ça marche super bien.
Merci beaucoup pour cette aide précieuse
Merci pour ce retour, au plaisir!
ps/ Merci de clôturer le fil en cliquant sur le bouton V vert du post à coté du bouton EDITER si problème résolu.