Bonsoir à tous,
j'ai un tout petit problème de "vocabulaire".
Je veux donc effectuer une macro dans chaque feuille de mon classeur.
Voici la macro :
Bon, je pense que c'est un truc du genre "For Each", d'où les trucs en rouge.
Sinon, je sais qu'il existe un truc sous 2007 pour partir de la dernière ligne non vide de la feuille, mais j'ai perdu son nom...
Merci beaucoup !
Kioups
j'ai un tout petit problème de "vocabulaire".
Je veux donc effectuer une macro dans chaque feuille de mon classeur.
Voici la macro :
Code:
Sub supp_lig()
Application.ScreenUpdating = False
[COLOR="Red"]For Each[/COLOR]
Dim i As Long
For i = [COLOR="Red"]Nbrelignedelafeuille[/COLOR] To 1 Step -1
If Range("D" & i) <> 8 Then Range("D" & i).EntireRow.Delete:
Next i
[COLOR="Red"]Next ???[/COLOR]
End Sub
Bon, je pense que c'est un truc du genre "For Each", d'où les trucs en rouge.
Sinon, je sais qu'il existe un truc sous 2007 pour partir de la dernière ligne non vide de la feuille, mais j'ai perdu son nom...
Merci beaucoup !
Kioups