Discussion :

[Ryadh-Belhadi]

Bonsoir mes confrères je souhaiterais savoir si quelqu'un parmi vous me pouvais aidé
j'ai créé un tableau excel 2007 est je veux savoir est ce qu'il y a un moyenne de créé un bouton macro qui montre seulement les ligne utilisé et cacher les ligne non utilisé, et merci d'avance.

[patricktoulon]

re
bonjour
"les lignes utilisées"??

1. lignes entieres?
2. 1 colonne en particulier?
3. plusieurs colonnes non contigues bien precises ?

il faut etre clair sur ce point car les methodes divergent un peu selon les criteres précédement cités

[BENNASR]

Bonsoir
je rejoins la réponse de patrick (à qui je souhaite bonne année 2018 et à tous les super membres de ce site) ta demande n'est pas claire mais si je suppose que tu as une feuille1 nommé "Feuil1" et que tu as un tableau commence de la colonne A : Il suffit de parcourir la colonne A et si y a pas de valeur tu masques toutes la ligne
si c'est ce que tu cherches voila une proposition
Attention : tu dois ajouter une autre bouton qui te permet d'afficher les lignes déjà cachées
il suffit de changer TRUE par FALSE
Bonne année cousin et one two three ....

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub MasquerLignesVide()
Dim i As Long
With Sheets("feuil1")
i = .Range("A" & Rows.Count).End(xlUp).Row
 For i = 2 To i
 If .Cells(i, 1) = "" Then
     .Cells(i, 1).EntireRow.Hidden = True
  End If
Next i
End With
End Sub

[patricktoulon]

Bonjour BENNARS
bonnes fetes a toi aussi
un simple filtre sur la/les colonne(s) en masquant le dropbutton suffit

exemple
garde que les lignes non vides

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub test1()
     ActiveSheet.Range("$A$1:$A$10").AutoFilter Field:=1, Criteria1:="<>", VisibleDropDown:=False
End Sub