Deprecated: RegularLabs\Library\ArrayHelper::implode(): Implicitly marking parameter $last_glue as nullable is deprecated, the explicit nullable type must be used instead in /homepages/10/d550841420/htdocs/libraries/regularlabs/src/ArrayHelper.php on line 225
Comment afficher et masquer rapidement des lignes de tableau ?

Recherche

Avec une macro. Ou plus exactement, avec deux macros, l'une pour masquer les lignes sélectionnées, l'autre pour afficher toutes les lignes du tableau.

Notez que la fonction Masquer n'existe pas. La première macro met à 0 la hauteur des lignes sélectionnées, la seconde donne une hauteur automatique à toutes les lignes du tableau.

Il suffira d'affecter un raccourci clavier à chacune des macros, ou bien à installer deux boutons sur la barre d'outils ou dans le ruban.

 Sub masque()
'macro écrite par m@rina
If Selection.Rows.Height > CentimetersToPoints(0.3Then
Selection.Rows.Height = CentimetersToPoints(0.02)
Selection.Rows.HeightRule = wdRowHeightExactly
End If
End Sub

Sub affiche()
'macro écrite par m@rina
Dim tablo As Table
Set tablo = Selection.Tables(1)
tablo.Rows.HeightRule = wdRowHeightAtLeast
End Sub

Statistiques

France 72,3% France
Canada 5,3% Canada
Chine 3,7% Chine

Total:

154

Pays
018457933
Aujourd'hui: 118
Hier: 236
Cette semaine: 118
Semaine dernière: 2.729
Ce mois: 5.861