Bonjour à tous,
Dans le but de créer une alerte sur un module de facturation, je dois calculer des échéances, je m'explique :
Je prends, pour simplifier, le mois de Janvier, qui est le mois sur lequel nous allons travailler.
Si la facture n'a pas été pré enregistrée 9 jours avant la fin de mois suivant (Février donc) alors on affiche l'alerte ( admettons une msgbox "TOTO")
Dans ma feuille de calcul cela, va se modéliser comme ceci :
la date de pré enregistrement est dans la cellule "AH9", et la cellule faisant référence au mois de Janvier est la cellule "Z7".
Ma condition codée, est donc la suivante :
le problème, est qu'apparemment, il ne detecte pas les "-9 jours", de meme, en mettant " DateSerial(...)-9" aucun résultat ... des idées ?
Arnaoke
Dans le but de créer une alerte sur un module de facturation, je dois calculer des échéances, je m'explique :
Je prends, pour simplifier, le mois de Janvier, qui est le mois sur lequel nous allons travailler.
Si la facture n'a pas été pré enregistrée 9 jours avant la fin de mois suivant (Février donc) alors on affiche l'alerte ( admettons une msgbox "TOTO")
Dans ma feuille de calcul cela, va se modéliser comme ceci :
la date de pré enregistrement est dans la cellule "AH9", et la cellule faisant référence au mois de Janvier est la cellule "Z7".
Ma condition codée, est donc la suivante :
Code:
If ActiveSheet.Range("AH9").Value <= DateSerial(Year(ActiveSheet.Range("Z7").Value), Month(ActiveSheet.Range("Z7").Value) + 2, -9) Then
msgbox "TOTO"
End Ifle problème, est qu'apparemment, il ne detecte pas les "-9 jours", de meme, en mettant " DateSerial(...)-9" aucun résultat ... des idées ?
Arnaoke
Dernière édition:
