Bonjour

J'ai appliqué la méthode décrite plus haut pour faire apparaitre et disparaitre des lignes dans mes feuilles.
Par contre je décroche au niveau du worksheet et pourtant j'en ai besoin.

Faut il créer une deuxieme macro?

Voici mon code on ne peut plus simple
Sub Macro1()

'Masque chambre
If Range("d18") = "0" Then
Rows("9:19").Select
Selection.EntireRow.Hidden = True
End If

'Affiche chambre
If Range("d18") <> "0" Then
Rows("9:19").Select
Selection.EntireRow.Hidden = False
End If

End Sub

Merci d'avance