Suppresion Ligne en Fonction choix dans une liste déroulante

Résolu
Andrea -  
DBAndy Messages postés 8 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je souhaiterai avoir de l'aide afin d'obtenir une macro permettant de supprimer plusieurs lignes en fonction d'un choix dans une liste déroulante .
Ma liste déroulante comporte 2 choix Oui/ Non et est située en M5
Je voudrais que si l'utilisateur saisisse Oui les lignes 11 à 48 soit masquées en revanche si l'utilisateur saisie Non je voudrais que ces même lignes apparaissent.

Si la case reste vide je voudrais masquer ces lignes !

Merci pour votre aide !
A voir également:

2 réponses

Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour,

Code à placer dans le module de la feuille
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Address = "$M$5" Then
Select Case Target.Value
Case "Oui": Rows("11:48").Hidden = True
Case "Non": Rows("11:48").Hidden = False
Case Else: Exit Sub
End Select
End If
End Sub

A+
1
DBAndy Messages postés 8 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup cela fonctionne parfaitement !!!
0
Fahora Messages postés 814 Date d'inscription   Statut Membre Dernière intervention   68
 
Bonjour ,

https://www.cjoint.com/c/ELimcPhPhkH

A toi d'adapter à ton fichier :).

Cordialement
Fahora
0