Je me débrouille en informatique mais la je n'arrive pas à trouver .... pouvez vous m'aider ?
J'ai un fichier avec plusieurs onglets (secteurs des métiers) et ses données sont regroupés sur une page appelée LISTE avec la formule suivante "=ONGLETMETIER!A2" ! Ici pas de soucis
Dans mes 6 onglets métiers les lignes sont remplies mais j'en est aussi des vides car j'ai étendu la sélection à A1000.
Je souhaite masquer les lignes dans ma page LISTE quand celles-ci sont vides car avec 1000 lignes dans chaque onglets j'ai déja 6000 lignes dont 5000 de vide.
Tu souhaites les masquer ou les supprimer ?
Pour les supprimer :
Code:
Sub delete_empty_row()
' ou 2 est égal à la feuille concernée
Sheets(2).Range("A2:A65000").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub
Pour masquer :
Code:
Sub hide_empty_row()
' ou 2 est égal à la feuille concerné
Sheets(2).Range("A2:A65000").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
End Sub
Ou encore :
Code:
Sub vhide_empty_row()
' ou 2 est égal à la feuille concerné
Sheets(2).Range("A2:A65000").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = xlVeryHidden
End Sub
Si tu veux qu'il soit impossible de les afficher via excel directement.
- Alt F11 pour afficher l'interface VBA
A gauche dans la fenêtre projet, clic droit puis insérer un module, tu colles le code que je t'ai donné.
Si tu n'y arrives pas, tu peux téléverser le fichier concerné, je te le ferais