Re : comment faire un historique?
Salut,
Peut être joindre le fichier aurait permis de mieux comprendre...
En tout cas, pour identifier la dernière ligne d'une plage de cellules, plusieurs méthodes :
- La première cellule vide de la colonne "A" de la Feuille "Feuil1"
NbLigne = Application.WorksheetFunction.CountA(Worksheets("Feuil1").Range("A:A"))
Range("A" & NbLigne)
ou encore
derlig = Cells(1, 1).End(xlDown).Row
Range("A" & derlig + 1).Select
- la Fonction IsEmpty() peut être utilde
Do i= 1
If IsEmpty(Cells(i,1) then
Code
End if
Loop
ou encore
For i =1 to NbLigne
If IsEmpty(Cells(i,1) then
Code
End if
Next i