Pb avec fonction Autofill

Bonjour à Tous,

Je bloque sur une petite macro utilisant la fonction AutoFill.

Dans une colonne C, je possède des noms mais celle ci peut être avec un nombre variable données

Dans la colonne B, j'aimerais pouvoir comptabiliser le nombre de ces données.

J'ai donc utilisé l'enregistreur de macro qui m'a donné ceci :

Sub Macro1()
'
' Macro1 Macro
'

'
    Range("B3").Select
    ActiveCell.FormulaR1C1 = "1"
    Range("B4").Select
    ActiveCell.FormulaR1C1 = "2"
    Range("B3:B4").Select
    Selection.AutoFill Destination:=Range("B3:B10"), Type:=xlFillDefault
    Range("B3:B10").Select
End Sub

Mais le problème, c'est qu'il ne tient pas compte que ma colonne C possède un nombre de données variable.

Comme vous pouvez le voir, je suis débutant en VBA et je vous remercie d'avance pour votre aide.

9classeur1.xlsm (14.75 Ko)

Olivier

C'est bon, j'ai trouvé !!!

Sub Macro1()
'
' Macro1 Macro
'

'
    Range("B3").Select
    ActiveCell.FormulaR1C1 = "1"
    Range("B4").Select
    ActiveCell.FormulaR1C1 = "2"
    Range("B3:B4").Select
    Selection.AutoFill Destination:=Range("B3:B" & Range("C" & Rows.Count).End(xlUp).Row), Type:=xlFillDefault
    Range("B3:B10").Select

End Sub

Désolé mauvais forum

Rechercher des sujets similaires à "fonction autofill"