[XL-2007] Calcul avec macro

Calcul avec macro

Bonjour,

Je souhaite faire un calcul très simple mais via les macro, je veux diviser la celulle C3 par la derniere ligne contenant du texte dans la colonne C +1 et que cette dernière soit bloquée afin que je puisse faire glisser mon calcule jusqu'à la derniere ligne contenant du texte dans la colonne C, le résultat s'affichant dans la colonne E.
Pour l'instant j'ai cela et je bloque sur la mise ne forme du calcul je le comprends pas trop :
Code:

1 2 3 4 5 6 7 8 ActiveCell.FormulaR1C1 = "=RC[-2]/R21C3" Range("E3").Select Range("E3").AutoFill Destination:=Range("E3:E" & DernLigne), Type:=xlFillDefault Range("E3:E" & DernLigne).Select Selection.Style = "Percent" Selection.NumberFormat = "0.0%" Selection.NumberFormat = "0.00%" Range("F8").Select
Merci de votre aide.

Code:

1
2
3
4
5
6
7
8
9
10
Dim DernLigne As Long
 
With Worksheets("Feuil1")    'à adapter
    DernLigne = .Cells(.Rows.Count, "A").End(xlUp).Row
    With .Range("E3:E" & DernLigne)
        .Formula = "=$C3/$C$" & DernLigne + 1
        .Value = .Value
        .NumberFormat = "0.00%"
    End With
End With

Parfait merci :)