Date via liste déroulante avec contrôle du mois

Bonjour au forum,

Tout d'abord, je vous souhaite une excellente nouvelle année à tous, et j'en profite aussi pour remercier les membres pour leurs précieuses aides

Voici mon petit problème :

Mon fichier comporte 12 feuilles (de janvier à décembre).

Dans chaque feuille, j'ai un tableau dans lequel les utilisateurs doivent insérer la date du jour (colonne B) via une liste déroulante que j'ai restreint par validation de données avec une liste de ce type =AUJOURDHUI(), ....., =AUJOURDHUI()-7.

Jusque là, tout va bien.

Là où je coince, c'est pour empêcher les utilisateurs de se tromper de mois. Il arrive en effet que certains oublient de changer d'onglet en début de mois et continuent à renseigner les cellules avec des dates du mois de mars dans l'onglet février, par exemple...

Auriez-vous une idée pour que je puisse garder ce choix de date (d'aujourd'hui à -7j) par liste déroulante tout en contrôlant que le mois saisi correspond bien au mois en cours ?

Salut,

Dans mon association, j'ai rencontré le même problème avec des feuilles de frais.

Je suis passé par un macro qui choisis la feuille selon le mois où l'on est.

Cela serait plus facile à faire si tu joignais un fichier .

Leakim

Salut Leakim,

Merci pour ta réponse.

C'est vrai que c'est bien mieux avec un fichier exemple (épuré), ci-joint

EDIT : fichier supprimé car verrouillé

Salut,

Ton fichier est verrouillé, alors je te mets le code

Private Sub Workbook_Open()
On Error Resume Next
       Sheets(Format(Date, "mmmm")).Activate
       If Err <> 0 Then MsgBox "L'onglet " & Format(Date, "Mmmm") & " n'existe pas !"
 End Sub

à placer des workbook.

Leakim

Salut Leakim,

Désolé pour le vérouillage du fichier, j'ai oublié de le déverouiller...

Super ta solution, ça fonctionne parfaitement

Excellente semaine à toi

Rechercher des sujets similaires à "date via liste deroulante controle mois"