recopie vers le bas à partir d'une cellule active

[philmaure]

Bonjour,

Comment recopier vers le bas une formule à partir d'une cellule active.

J'identifie la première cellule vide d'une ligne dans laquelle je colle une formule et ce chaque semaine.
Je souhaiterai ensuite recopier cette formule vers le bas

Mon problème est que chaque semaine la formule se décale d'une colonne. Je ne peux donc mettre de valeur de colonne dans la macro.

Merci pour votre aide

cdlt
Philmaure

 

[pierrejean]

Bonsoir philmaure

A tester

 

[ChTi160]

Bonsoir philmaure
Bonsoir Pierrejean
une autre approche

Sub Test()
 With Feuil1
  DerLgn = .Cells(.Rows.Count, 1).End(xlUp).Row
          col = .Cells(2, .Columns.Count).End(xlToLeft).Column + 1
      With .Range(.Cells(2, col), .Cells(DerLgn, col))
                .FormulaR1C1 = "=VLOOKUP(RC1,Feuil2!C1:C2,2,FALSE)"
      End With
 End With
End Sub

Bonne fin de Soirée
Amicalement
Jean marie

 

[philmaure]

bonjour Pierrejean et Chti160, un grand merci à vous deux pour votre solution

Bonne journée

Cordialement
Philmaure