Un help pour ce code

[Ilino]

Bonjour Forum
puis je avoir votre Help pour ce soucis

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Sheets("Chap1").Range("C35")) Is Nothing Then
       Application.ScreenUpdating = False
        Rows("13:194").Hidden = Sheets("Chap1").Range("C35") = "Pas de Jonction"   'Masquer les PJ-pj si il n'y a pas de jonction
     End If
 End Sub

GRAZIE

 

[Ilino]

Re : Un help pour ce code

Bonjour JEAN
Merci pour la réponse mais mon souci est le suivant
si C35(fusionnée) de la feuilleChap1 ="Pas de Jonction" alors masquer les lignes 13-194 de la feuille Chap2.
Merci

 

[Ilino]

Re : Un help pour ce code

Re
ça n'a pas marché....
ci joint le fichier.
A+

 

[Ilino]

Re : Un help pour ce code

Re
oui ce que je souhaiterai ..mais ça n'a pas marché
A+

 

[Ilino]

Re : Un help pour ce code

RE jean
merci ça marché parfaitement.
grazie