Bonjour tous le monde
J'ai un petit problème avec mon code d'effacement, j'ai du me planter dessus.
Son but supprimer les lignes ou n_obs a pour valeur "" rien, on peut pas faire plus simple quoi, et dès que valeur différente de "", on arrete la boucle.
Je comprend plus, pourquoi sa arrive a moi!!!!, j'ai rien fait pourtant, je suis gentil.
n_obs et en colonne 9, et mes valeurs commence el ligne 2
Merci
J'ai un petit problème avec mon code d'effacement, j'ai du me planter dessus.
Son but supprimer les lignes ou n_obs a pour valeur "" rien, on peut pas faire plus simple quoi, et dès que valeur différente de "", on arrete la boucle.
Code:
'Effacement des lignes vides
'For z = 2 To Range("I65536").End(xlUp).Row
For Each z In Range("I2:I65536")
If Cells(z, 9).Value = "" Then
Rows(z).Delete shift:=xlUp
End If
Next z
Je comprend plus, pourquoi sa arrive a moi!!!!, j'ai rien fait pourtant, je suis gentil.
n_obs et en colonne 9, et mes valeurs commence el ligne 2
Merci