récupération numéro semaine et mois dans formulaire

[hidozo]

Bonjour,

J'affiche la date en automatique dans un formulaire,

Je souhaite récupérer le mois et le numéro de la semaine dans 2 textbox, comment faire à partir de la date de ma text box?

Code de base :

Private sub Userform-initialize()
dim today as date
ceq.2value = today
end sub

 

[Pierrot93]

Re : récupération numéro semaine et mois dans formulaire

bonjour hidozo

regarde le code ci dessous, si cela peut t'aider :

TextBox1.Value = Date
TextBox2.Value = DatePart("ww", CDate(TextBox1.Value), vbMonday, vbFirstFourDays)
TextBox3.Value = DatePart("m", CDate(TextBox1.Value), vbMonday, vbFirstFourDays)

bon après midi
@+

 

[hidozo]

Re : récupération numéro semaine et mois dans formulaire

Re,

Et qui sait qui a droit à un super remerciement ????

Merci pierrot

Super génial, ça fonctionne en modifiant légèrement mon code.

A plus

hidozo