Bonjour,
J'essaie depuis quelques temps de cacher des lignes avec un macro pour toutes les feuilles.
J'ai crée une flèche(bouton) pour afficher les lignes cachés et un bouton pour les cacher.
Voici le code pour afficher,
Sub Flècheverslebas2_Cliquer()
Dim mot_de_passe As String
mot_de_passe = InputBox("Donnez le mot de passe")
If mot_de_passe = "0801" Then
Rows("6:15").Hidden = False
Else: Exit Sub
End If
End Sub
Voici le code pour cacher,
Sub Flècheverslehaut4_Cliquer()
Dim mot_de_passe As String
mot_de_passe = InputBox("Donnez le mot de passe")
If mot_de_passe = "0801" Then
Rows("6:15").Hidden = True
Else: Exit Sub
End If
End Sub
Je voudrais donc que ces boutons s'applique pour les mêmes lignes mais pour toutes les feuilles.
Pourriez-vous m'aider?