Re
Bonjour m3ellem1 & ric
j'ai ajouté 2 colonnes à ton fichier ... mon but est de te guider dans la résolution du sujet par toi même, cela peut toujours servir
la première colonne donne le nombre de caractères
la seconde le premier caractère
en effet, il y a un espace (on trouve aussi souvent un espace insécable : 160 au lieu de 32)
tu peux donc mettre simplement
Private Sub CommandButton1_Click()
Dim i As Integer
For i = Cells(Rows.Count, 2).End(xlUp).Row To 1 Step -1
If (Cells(i, 2)) = " " Then Rows(i).Delete
Next i
End Sub
au passage, Cells(Rows.Count, 2) permet de s'adapter à la version d'excel