Je vous remercie pour votre réponse
Malheureusement le fichier est bloqué par mot de passe mais je peux vous fournir le code VBA afin de comprendre où il y a un problème :
Sub ArchiveDock()
Dim ligne, col_fin As Integer
col_fin = 16
Sheets("Docker's planning").Select
ActiveSheet.Rows(ActiveCell.Row).EntireRow.Select
ligne = ActiveCell.Row
Range(Cells(ligne, 1), Cells(ligne, col_fin)).Cut
Sheets("Archive Docker's Planning").Select
Range("A2").Select
If ActiveCell.Value <> "" Then
Do While ActiveCell.Value <> ""
ActiveCell.Offset(1, 0).Select
Loop
ActiveSheet.Paste
Else
ActiveSheet.Paste
End If
Sheets("Docker's Planning").Select
Range("A" & ligne).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Rows(ActiveCell.Row).Delete
Avec ceci la ligne se vide mais je veux que la ligne que je viens de vider se supprime et je sais pas comment faire
merci