Macro- faire descendre les formules des dernières cellules non vides (lignes variables)

[captain78]

Bonjour
voila, je cherche à faire descendre les formules des dernières cellules non vides présentes dans certaines colonnes. en sachant que au fil des mois, la ligne où sont présentes ces formules est variable tout comme la fin de la sélection.
pas évident à expliquer. L’exemple très simple ci-joint vous aidera à me comprendre.
Je ne dois donc pas avoir de valeurs fixes (C3:D7) dans mon code (copié ci-dessous).
HELP. comment faire? Merci d’avance

Range("C1").Select
Selection.End(xlDown).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.AutoFill Destination:=Range("C3:D7")
Range("C3:D7").Select

End Sub

demande captain78.xlsm (15,0 Ko)

[Mimimathy]

Bonjour,

Remplace ta macro par celle-ci

Sub auto()
  Dim Dl1%, Dl2%
  Dl1 = Range("A" & Rows.Count).End(xlUp).Row 'n° de la dernière ligne non vide de la colonne A
  Dl2 = Range("C" & Rows.Count).End(xlUp).Row 'n° de la dernière ligne non vide de la colonne C
  Range("C" & Dl2).Select
  Range(Selection, Selection.End(xlToRight)).Select
  Selection.AutoFill Destination:=Range(Cells(Dl2, 3), Cells(Dl1, 4))
End Sub

[captain78]

merci beaucoup. C’est nickel.
J’ai su l’adapter à mon besoin final.
Peux tu juste m’expliquer ce que signifie cela exactement : “Dim Dl1%, Dl2%”
Merci

[Mimimathy]

Re,

Un peu de lecture

Déclaration de variables (VBA)