Macro appliquer une formule dans une colonne
D
Bonjour,
Je veux réaliser une macro qui doit appliquer formule une dans une toute ma colonne J a partir de J2 de ma feuille "synthèse", pour info je suis novice et je ne sais pas comment l'appliquer a ma colonne entière.
ci-dessous mon code :
Sub appliquer formule ()
Range("J2").Select
ActiveCell.FormulaR1C1 = "=DATEDIF(RC[-5],RC[-4],""d"")"
End sub()
Si quelqu’un veut bien m'aider et m 'expliquer sa démarche.
Merci d'avance,
Cordialement,
Bonjour Darkeg, bonjour le forum,
Essaie comme ça :
Sub appliquer_formule()
Dim DL As Integer 'déclare al variable DL (Dernière Ligne)
DL = Cells(Application.Rows.Count, "E").End(xlUp).Row 'définit la derniere ligne DL de la colonne E (colonne à adapter à ton cas)
Range("J2").FormulaR1C1 = "=DATEDIF(RC[-5],RC[-4],""d"")"
Range("J2").AutoFill Destination:=Range("J2:J" & DL), Type:=xlFillDefault
End SubD
Bonjour ThauThème,
Merci ta solution marche super bien
Cordialement,