suppression de ligne auto

[kromitou]

Bonjour.......;

Encore moi avec un nouveau sujet... je voudrais une soluce si possible, pour pouvoir supprimer des lignes automatiquement sur une page une fois que mon résultat est donné. (Voir exemple sur le fichier joint)

Merci d'avance pour ceux qui trouve..... [file name=suppressionligneauto.zip size=3383]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/suppressionligneauto.zip[/file]

 

[ziopizza]

Bonjour kromitou,le Forum,
suprime lignes vides.
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
For n = Range('A65536').End(xlUp).Row To 1 Step -1
On Error Resume Next
If Cells(n, 1) = '' Then Rows(n).Delete
Next n
Application.ScreenUpdating = True
End Sub
Salut Yves

 

[AV]

Ave,

''...Encore moi avec un nouveau sujet... ''

Je souhaiterais que tu répondes à la question que je t'ai posé dans le dernier fil** que tu as initié :

**''Trouver une formule adéquate''
19/04/2006 11:49

AV [aaa]

 

[CBernardT]

Bonjour kromitou, Ziopizza et AV,

Une solution par macro.

Cordialement

Bernard [file name=suppressionligneautoV1.zip size=12211]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/suppressionligneautoV1.zip[/file]

 

[AV]

Salut CBernardT,

Est-ce vraiment bien raisonnable de déclarer les lignes as Integer ?
;-))

Une autre méthode une misère plus rapide...

AV [aaa] [file name=SupLignes.zip size=44488]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SupLignes.zip[/file]

 

[kromitou]

MERCI A TOUS................. :woohoo: