Macro qui ecrit une valeur de la 2e ligne de l

Bonjour,

je cherche à écrire une valeur (la meme ==> 1) de la 2e ligne de la colonne F (F2) jusqu'à la derniere ligne de la feuille.

Merci d'avance

Bonsoir,

essaie :

Range("F2:F" & Rows.Count) = 1

Amicalement

Dan

merci, j'ai mal exprimé ma demande ; je souhaite écrire de f2 jusqu'à la derniere ligne écrite y compris.

merci d'avance

Bonjour à tous,

je réitère ma demande, d façoni plus précise :

Je veux écrire dans la cellule F2 la valeur "1" jusqu'à la derniere ligne écrite de la feuille ; si des infos sont définies en A45 par exemple, je souhaite avoir la mention "1" de F2 à F45

Merci d'avance

Bonjour à tous,

Bonjour Dan,

Sub essai1()
Dim DerLig As Long
DerLig = Cells.Find("*", , , , xlByRows, xlPrevious).Row
Range("f2:f" & DerLig) = 1
End Sub

Bonne journée

Claude.

merci cela marche

a bientot

je note le post RESOLU