affichées zones nommées

[manon]

Bonjour,

Dans mon tableau des horaires de travail, fichier joint, je n'arrive pas à faire fonctionner une macro à chaque changement de valeur dans une liste; ma liste est en cellule "a1", et sur choix dans cette liste des mois, en fonction du mois sélectionné, la zone nommée égale au nom sélectionnée devrait s'afficher, et rien ne se passe, quelqu'un peut-il me dire pourquoi?
De la même façon, je souhaiterais sélectionner un seul salarié à la fois avec la liste de validation située en "a2".
Merci pour votre aide.

Manon

 

[Cousinhub]

Re : affichées zones nommées

Bonsoir,

pour la première question :

Attention à l'écriture... :

If Target.Address = "$a&1" Then

est différent de :

If Target.Address = "$A$1" Then

De plus, modifie légèrement ton code comme ceci :

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
On Error Resume Next
If Target.Count > 1 Then Exit Sub
If Target.Address = "$A$1" Then
    If Target = "" Then
        Range("3:231").Rows.Hidden = False
    Else
        Range("3:231").Rows.Hidden = True
        Range(Target).Rows.Hidden = False
    End If
End If
End Sub

si tu effaces ce qu'il y a en A1, on ré-affiche toutes les lignes...

Pour la question 2 : 😕😕

 

[manon]

Re : affichées zones nommées

C'est bon ça marche, j'ai rectifié mon erreur de & en $ et j'ai complété le code pour masquer les colonnes, tout fonctionne.
Merci à bhbh et à vous tous
et bonne soirée

Manon