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

guimstar Messages postés 3 Statut Membre -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
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 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
Bonjour

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