Déclenchement d'alerte automatique

Jeffce Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   -  
tyranausor Messages postés 3545 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à ceux qui me liront, voici ma question: je voudrais déclencher une alerte selon le contenu d'une ou de plusieurs cellules à renseigner (par choix dans une liste déroulante déjà existante), dans un tableaux qui a la forme d'un calendrier; Je sais manipuler excel mais pas VBA, donc ce que je ne sais pas faire, c'est obtenir l'apparition de l'alerte sous forme d'un messagebox, et/ou d'un clignotant, qui ouvre la messagerie par un lien hypertexte pour l'envoi d'un message, et qui soit désactivé ou disparaisse une fois acquitté (par l'envoi d'un message par ex) jusqu'à nouvel évènement dans la journée, et de toute façon le lendemain de l'alerte. L'alerte, elle, devra rester dans l'historique.
J'avais un début de réponse avec le code suivant, mais il est assigné à une seule cellule (donc une date fixe (ici: N4) alors qu'il faudrait que la date du jour soit prise en compte:
Dim Valeur As Integer
Valeur = Range("N4").Value
If Valeur > 0 Then
MsgBox ("Attention : au moins une valeur non conforme")
End If

Merci pour votre aide, je rentre dans le monde fascinant VBA.... JFC

1 réponse

tyranausor Messages postés 3545 Date d'inscription   Statut Membre Dernière intervention   2 039
 
Bonjour
<ital>une date fixe (ici: N4) ...
Valeur = Range("N4").Value
If Valeur > 0 Then
MsgBox ("Attention : au moins une valeur non conforme")
End If
</ita>

Tu as une condition sur la date pour tester si elle est supérieure à 0 !!!! Sous Excel les dattes sont un nombre de jours après le 01/01/1900, tu passes ta date en texte et tu verras!
0