OVH Cloud OVH Cloud

Cellule

2 réponses
Avatar
Mérinos06
Bonjour à tous !

Je souhaiterais savoir ce qu'il faut coder en VBA pour savoir si une cellule
donnée appartient à une plage nommée.

Mon problème : j'ai plusieurs plages nommées "Janvier", "Février" etc. et je
veux empêcher l'utilisateur de saisir dans la plage qui n'est pas le mois en
cours

Il faut donc que je teste si la cellule dans laquelle l'utilisateur effectue
sa saisie appartient bien à la plage s'appelant comme le mois en cours.

Je ne souhaite pas protéger la feuille.

Merci d'avance pour vos réponses.

2 réponses

Avatar
Rai
Bonjour à tous !

Je souhaiterais savoir ce qu'il faut coder en VBA pour savoir si une cellule
donnée appartient à une plage nommée.

Mon problème : j'ai plusieurs plages nommées "Janvier", "Février" etc. et je
veux empêcher l'utilisateur de saisir dans la plage qui n'est pas le mois en
cours

Il faut donc que je teste si la cellule dans laquelle l'utilisateur effectue
sa saisie appartient bien à la plage s'appelant comme le mois en cours.

Je ne souhaite pas protéger la feuille.

Merci d'avance pour vos réponses.


Bonjour,

Si tu utilies Intersect, tu devrais t'en sortir.

If Not Application.Intersect(Target, Range("Janvier")) Is Nothing Then
MsgBox "Janvier"
End If

Ca te convient ?

Cordialement

Rai

Avatar
Mérinos06
Merci Rai pour ton aide.

Ca marche super !

Mérinos06


Bonjour à tous !

Je souhaiterais savoir ce qu'il faut coder en VBA pour savoir si une cellule
donnée appartient à une plage nommée.

Mon problème : j'ai plusieurs plages nommées "Janvier", "Février" etc. et je
veux empêcher l'utilisateur de saisir dans la plage qui n'est pas le mois en
cours

Il faut donc que je teste si la cellule dans laquelle l'utilisateur effectue
sa saisie appartient bien à la plage s'appelant comme le mois en cours.

Je ne souhaite pas protéger la feuille.

Merci d'avance pour vos réponses.


Bonjour,

Si tu utilies Intersect, tu devrais t'en sortir.

If Not Application.Intersect(Target, Range("Janvier")) Is Nothing Then
MsgBox "Janvier"
End If

Ca te convient ?

Cordialement

Rai