Copie de formule

[Amo]

Bonjour à tous,
je vous ai joins un fichier dans lequel se trouve un tableau.
Je cherche une macro permettant de remplir les formules des colonnes C et D pour qu'elles se répercutent que dans les ligne remplie du tableau. Mon but est de gagner de la place...
Je vous remercie d'avance
Amo. [file name=copieformule.zip size=7840]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/copieformule.zip[/file]

 

[Law]

Bonjour Amo, bonjour le forum,

Voici le code à saisir dans ton module :

Sub Calcul()

Dim Z As Integer, A As Integer
Dim B As Variant

Z = Sheets(1).Range('A65000').End(xlUp).Row

With Sheets(1)
For A = 5 To Z
B = .Cells(A, 2).Value
If B <> '' Then
.Cells(A, 3).Value = B / 8 * 5
.Cells(A, 4).Value = .Cells(A, 2).Value + .Cells(A, 3).Value
End If
Next A
End With

End Sub

Bonne journée,
Ciao ciao

 

[Amo]

Ok merci mais n'y aurait il pas la possibilité de selectionner la ligne de formule et de la tirer jusqu'à la dernière ligne remplie et tout ceci par macro bien entendu ?
Merci