Msgbox changement valeur avec VBA ou Macro
Bonjour à tout le monde.
Je cherche désespérément à écrire un code VBA ou une macro qui permet de réaliser l'opération suivante :
J'écris des dates dans la colonne B (exemple 15/01/2020, 16/01/2020, 31/01/2020). La colonne A affiche 1 grâce à la fonction simple =MOIS(b1)
Comment écrire une VBA ou une macro pour que si j'écris dans la colonne B 15/02/2020 ou 16/02/2020 ..., un msgbox s'affiche en disant :"Vous entamez un nouveau mois". Et ainsi de suite jusqu'à décembre.
Merci par avance pour votre aide si possible. J'ai lu beaucoup sur les forums et je n'arrive pas à avoir la bonne solution.
Bonjour WG², bonjour le forum,
Essaie comme ça :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Or Target.Row = 1 Then Exit Sub
If Month(Target.Offset(-1, 0)) <> Month(Target.Value) Then MsgBox "Vous entamez un nouveau mois !"
End SubBonjour WgWg et
Voici un exemple de ce qu'on peut faire
@+
Edit : coucou ThauThème, pas vu ta réponse
Chers amis, BrunoM45 et ThauThème,
Je ne pourrai pas vous remercier suffisamment. Si vous saviez à quel point vous m'aidez. J'ai passé un temps fou sans succès. Mais grâce à votre aide c'est résolu. Vous êtes parfaits. Toute ma gratitude.