message de rappel le dernier jour du mois

[Alex]

bonjour a tous

Est-il possible de faire apparaitre un message de rappel le dernier jour de chaque mois?

Merci d'avance

 

[andré]

Salut Alex,

Voici une petite formule qui te permetsd e la faire : =SI(AUJOURDHUI()=FIN.MOIS(AUJOURDHUI();0);"C'est le jour de paie !";"")

Ândré.

 

[sousou]

Bonjour

Dans cette exemple, si à l'ouverture du fichier, la macro auto-open va te dire si c'est le dermier jour d'un mois

Sub auto-open()
madate=date

'madate = CDate(InputBox(""))' cette ligne est pour tester.


If Month(madate) <> Month(madate + 1) Then
MsgBox "dernier"
End If
End Sub

 

[Alex]

merci c sympathique de votre part !

J'aurais voulu savoir aussi s'il il été possible de récupérer le mois en toute lettre ?

merci

 

[andré]

Resalut,

Pour récuperer le mois en toutes lettres il faut appliquer le format mmmm à la cellule, c'est tout.

Ândré.

 

[C@thy]

Coucou!!!

Attention, André, FIN.MOIS est une macro complémentaire, il faut au préalable l'avoir installée comme suit :

menu Outils/Macros complémentaires cocher la case à gauche de Utilitaire d'analyse.

C'est évident pour toi, mais peut-être pas pour tout le monde.

@+

C@thy