Bonjour,
Merci en avance de votre aide,
J’ai eu ce code dans un forum, Je pense que ça réponds a mon objectif pour recopier les fonctions du linge précèdent sur une feuil de calcule, mais j’arrive pas a paramètre merci de m’avoir expliquer.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Dim Fin As Integer
Range("a6").Select
Fin = Range("a1").End(xlDown).Row
Range("b1").Copy
Range("b1:D" & Fin).Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False