Re : Masquer des lignes avec formules
Je reprend tout depuis le début :
Bonjour à toutes et à tous,
Voici mon problème : (je débute en vba)
Dans mon projet, je cherche à masquer/afficher à l'aide d'un bouton les lignes dont la formule en colonne A de la feuille "annuaire" se reporte à une cellule vide (que je remplie à la main en cas de besoin) dans la feuille "chantiers" de ce même classeur.
Je suis arrivé pour le moment aux codes suivant :
Private Sub CommandButton1_Click()
CommandButton1.Caption = IIf(CommandButton1.Caption = "Masquer", "Afficher", "Masquer")
Range("A3:A20").EntireRow.Hidden = IIf(CommandButton1.Caption = "Masquer", False, True)
End Sub
mais ceci me masque toutes les lignes nommé par Range.
Si je met ce code :
Private Sub CommandButton1_Click()
CommandButton1.Caption = IIf(CommandButton1.Caption = "Masquer", "Afficher", "Masquer")
Range("A8:A105").SpecialCells(xlCellTypeBlanks).En tireRow.Hidden = IIf(CommandButton1.Caption = "Masquer", False, True)
End Sub
il me masque seulement les quelques lignes qui n'ont pas de formules (s'il y en as).
Je vous joint un fichier en pièce jointe pour appuyé ma demande, je tiens à précisé que ce classeur n'est pas celui sur lequel je travail mais juste un exemple.
Merci d'avance pour votre aide.