Bonjour à tous j'aimerai tirer mes formules des colonnes A b et C jusqu'à la dernière ligne non vide de la cellule D. Ceci depuis la dernière ligne non vide en A, b et C, cette ligne peut se trouver en ligne 5, 6 ou une autre. Je l'ai fait avec le code ci-dessous depuis la ligne 2, mais j'aimerai le faire depuis la dernière ligne non vide et je n'arrive pas à trouver la bonne syntaxe en introduisant une variable i , quelqu'un pourrait m'aider ?
Par avance merci
sub essai()
dim fin As Long
Dim i As Integer
Sheets("Stock VD").Select
i = 1
While (Cells(i, 1).Value <> "")
i = i + 1
Wend
With Sheets("Stock VD")
fin = .Range("d" & .Rows.Count).End(xlUp).Row
.Range(cell(1, i), cell(3, i)).AutoFill Destination:=.Range(cell(1, i, 3) & fin)
End With
End Sub
Par avance merci
sub essai()
dim fin As Long
Dim i As Integer
Sheets("Stock VD").Select
i = 1
While (Cells(i, 1).Value <> "")
i = i + 1
Wend
With Sheets("Stock VD")
fin = .Range("d" & .Rows.Count).End(xlUp).Row
.Range(cell(1, i), cell(3, i)).AutoFill Destination:=.Range(cell(1, i, 3) & fin)
End With
End Sub