Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Supprimer des lignes

1 réponse
Avatar
Nito
Bonjour à vous tous

J'aimerasi savoir commennt supprimer des lignes dans un tableau qui ne
contiennent rien avant de l'imprimer mais que ceux ci reprennent leur place
apres l'impression
EX:
De la ligne 15 à 25 quelque chose d'ecrit
de 26à 30 rien et 31 quelque chose

merci
Nito

1 réponse

Avatar
Philippe.R
Bonjour,
On pourra donc masquer les lignes vides dans l'évènement Beforeprint

Private Sub Workbook_BeforePrint(Cancel As Boolean)
deRLig = Range("a6543").End(xlUp).Row
Range("a1:a" & deRLig).SpecialCells(xlCellTypeBlanks) _
.EntireRow.Hidden = True
End Sub

et les remontrer à la demande

Sub montrelig()
deRLig = Range("a6543").End(xlUp).Row
Range("a1:a" & deRLig).SpecialCells(xlCellTypeBlanks) _
.EntireRow.Hidden = False
End Sub
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"Nito" a écrit dans le message de
news:
Bonjour à vous tous

J'aimerasi savoir commennt supprimer des lignes dans un tableau qui ne
contiennent rien avant de l'imprimer mais que ceux ci reprennent leur
place apres l'impression
EX:
De la ligne 15 à 25 quelque chose d'ecrit
de 26à 30 rien et 31 quelque chose

merci
Nito