Comment afficher le mois précédent sur un TextBox?

Fermé
guimstar Messages postés 3 Date d'inscription mercredi 22 août 2012 Statut Membre Dernière intervention 14 avril 2013 - 14 avril 2013 à 12:09
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 15 avril 2013 à 09:24
Bonjour à tous!
Je travail actuellement sur un petit programme en VBA. Le problème que je rencontre est le suivant: j'ai besoin d'afficher le mois précédent dans un TextBox. Mais je n'arrive pas.
Jai tenté d'utiliser le code suivant:
Private Sub UserForm_Initialize()
TextBox1 = Format((Now) - Month(dernier_mois), "mmmm yyyy")
End Sub
ça marche jusqu'au 12 du mois encours. J'aimerai avoir cela tout au long du mois
J'attend impatienment votre aide.
Merci d'avance
A voir également:

1 réponse

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
15 avril 2013 à 09:24
Bonjour

sub test()
MsgBox Format(DateSerial(Year(Date), Month(Date) - 1, 1), "mmmm yyyy") 
End sub
0