Bonjour le forum, les internautes,
Pouvez vous m'aider à améliorer ce bout de code.
If Application.Intersect(ActiveCell, Range("B3:AF19")) Is Nothing Then GoTo Sortie.
En effet pour les mois à 31 jours cela correspond très bien par contre pour les mois à 28,29 et 30 jours quand je clique sur les boutons formulaires l'inscription se fait vu la plage b3:af19.
J'ai cherche sur le net un bout de code qui prendrait en compte la variable des mois mais sans succès.
Merci à vous.
Pouvez vous m'aider à améliorer ce bout de code.
If Application.Intersect(ActiveCell, Range("B3:AF19")) Is Nothing Then GoTo Sortie.
En effet pour les mois à 31 jours cela correspond très bien par contre pour les mois à 28,29 et 30 jours quand je clique sur les boutons formulaires l'inscription se fait vu la plage b3:af19.
J'ai cherche sur le net un bout de code qui prendrait en compte la variable des mois mais sans succès.
Merci à vous.