VBA Copie formule jusqu à la dernière colonne remplie

reve24 · 2 Novembre 2015

Bonjour

Merci d'avance

J aimerais en vba copier une formule et ce jusqu à la dernière colonne remplie .

VOIR MON PETIT FICHIER

Et bonne journée à tous !

job75 · 2 Novembre 2015

Re : VBA Copie formule jusqu à la dernière colonne remplie

Bonjour reve24,

Code:

Sub RemplirDerniereLigne()
With [A1].CurrentRegion
  .Rows(.Rows.Count).FormulaR1C1 = .Cells(.Rows.Count, 1).FormulaR1C1
End With
End Sub

A+

job75 · 2 Novembre 2015

Re : VBA Copie formule jusqu à la dernière colonne remplie

Re,

Ou aussi :

Code:

Sub RemplirDerniereLigne1()
With [A1].CurrentRegion
  .Cells(.Rows.Count, 1).AutoFill .Rows(.Rows.Count), xlFillValues
End With
End Sub

Et si l'on veut aussi copier la mise en forme :

Code:

Sub RemplirDerniereLigne2()
With [A1].CurrentRegion
  .Cells(.Rows.Count, 1).Copy .Rows(.Rows.Count)
End With
End Sub

Bonne soirée.

VBA Copie formule jusqu à la dernière colonne remplie

reve24

XLDnaute Occasionnel

Pièces jointes

job75

XLDnaute Barbatruc

job75

XLDnaute Barbatruc

Discussions similaires

VBA Copie formule jusqu à la dernière colonne remplie

reve24

XLDnaute Occasionnel

Pièces jointes

job75

XLDnaute Barbatruc

job75

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency