Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$M$13" Then
If Target.Value = "Oui" Then Feuil2.Visible = True
If Target.Value = "Non" Then Feuil2.Visible = False
End If
If Target.Address = "$M$34" Then
If Target.Value = "Oui" Then Feuil3.Visible = True
If Target.Value = "Non" Then Feuil3.Visible = False
End If
End Sub