Macro EXCEL copier formule Résolu/Fermé

Question

Bonjour,

Désolé de vous ennuyer mais je réussi pas ce que je veux faire:

J'ai un tableau dont la colonne C est vide Je veux remplir cela par A+B=C
Mais mes colonne A et B ont un nombre de lignes variable( en fonction des jours 5 à 200) et je souhaite que ma formule s'arrête a la dernière lignes non vide.

A l'heure actuel avec la fonction enregistrement de macro j'obtiens le code suivant:

Sub ESSAIE()
'
' ESSAIE Macro
'

'
    ActiveCell.FormulaR1C1 = "=RC[-2]+RC[-1]"
    ActiveCell.Select
    Selection.AutoFill Destination:=ActiveCell.Range("A1:A4")
    ActiveCell.Range("A1:A4").Select
    ActiveCell.Offset(4, -2).Range("A1").Select
End Sub


Si vous pouvez m'aider!!!!

Cordialement

lermite222 · Answer

Bonjour,
Tant qu'à faire une macro pourquoi pas faire directement les calculs ?
Sub AddCel()
Dim Lig As Long
    Sheets("Feuil1").Select
    For Lig = 1 To Range("A65536").End(xlUp).Row
        Cells(Lig, 3) = Cells(Lig, 1) + Cells(Lig, 2) 'Add A+B et met dans C
    Next Lig
End Sub
A+

wilfried_42 · Answer

bonjour

autre methode
sub mamacro()
     Range("C1").FormulaR1C1 = "=RC[-2]+RC[-1]" 
     range("C1:C" & range("B65536").end(xlup).row).filldown
End Sub

ninajams · Answer

Merci a tous les deux sa fonctionne parfaitement !!!!!!

Je désespère pas de réussir à me débrouillé tout seul un jour !!!!

A+