Indication de date dans textbox

[gildas lechat]

Bonjour le forum,

Je recherche le code pour afficher automatiquement le mois en cours dans un textbox sous la forme suivante :
Janvier
Fevrier
...

Merci de votre aide
Gildas

 

[Pierrot93]

Re : Indication de date dans textbox

Bonjour,

pas ouvert ton fichier mais regarde peut être ceci, à utiliser dans le module de l'usf ou de la feuille où se trouve ton textbox...

Me.TextBox1 = StrConv(Format(Date, "mmmm"), vbProperCase)

bon après midi
@+

 

[bond]

Re : Indication de date dans textbox

ou

UserForm1.TextBox1.Value = Format(Month(Date), "mmmm")
UserForm1.Show

 

[GeoTrouvePas]

Re : Indication de date dans textbox

Bonjour,

A placer directement dans le userform :

Private Sub UserForm_Initialize()
    TextBox1 = Format(Date, "mmmm")
End Sub

Edit : Pierrot93, dit le Lucky Luke du forum, m'a encore grillé d'une poignée de secondes ^^. Bonjour au passage
Edit 2 : Et bonjour Bond également ^^

 

[Pierrot93]

Re : Indication de date dans textbox

Re, bonjour bond, Geo

@bond, teste ton code, il va renvoyer le 12ème jour du calendrier excel soit le 11 janvier 1900....

ou

UserForm1.TextBox1.Value = Format(Month(Date), "mmmm")
UserForm1.Show

 

[gildas lechat]

Re : Indication de date dans textbox

Merci pour vos réponses

Gildas