Bjr à tous
Dans un UserForm, je voudrais proposer à l'ouverture du User , la date de
l'année dans un textBox sous la forme 2007. J'arrive très bien à la rentrer
sous nombre mais pas sous le format de date.
Quelqu'un aurait-il une idée
D'avance merci
Patrick
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
PMO
Bonjour,
Voici une piste
'***************** Private Sub UserForm_Initialize() Me.TextBox1 = Year(Now) End Sub '*****************
Cordialement.
-- PMO Patrick Morange
Bjr à tous Dans un UserForm, je voudrais proposer à l'ouverture du User , la date de l'année dans un textBox sous la forme 2007. J'arrive très bien à la rentrer sous nombre mais pas sous le format de date. Quelqu'un aurait-il une idée D'avance merci Patrick
Bonjour,
Voici une piste
'*****************
Private Sub UserForm_Initialize()
Me.TextBox1 = Year(Now)
End Sub
'*****************
Cordialement.
--
PMO
Patrick Morange
Bjr à tous
Dans un UserForm, je voudrais proposer à l'ouverture du User , la date de
l'année dans un textBox sous la forme 2007. J'arrive très bien à la rentrer
sous nombre mais pas sous le format de date.
Quelqu'un aurait-il une idée
D'avance merci
Patrick
'***************** Private Sub UserForm_Initialize() Me.TextBox1 = Year(Now) End Sub '*****************
Cordialement.
-- PMO Patrick Morange
Bjr à tous Dans un UserForm, je voudrais proposer à l'ouverture du User , la date de l'année dans un textBox sous la forme 2007. J'arrive très bien à la rentrer sous nombre mais pas sous le format de date. Quelqu'un aurait-il une idée D'avance merci Patrick
Patrick Catarsi
Le 16/06/07 21:15, dans , « PMO » <patrickPOINTmorangeAROBASElapostePOINTnet> a écrit :
Bonjour,
Voici une piste
'***************** Private Sub UserForm_Initialize() Me.TextBox1 = Year(Now) End Sub '*****************
Cordialement.
ca marche Merci
Le 16/06/07 21:15, dans 738DE083-1600-4A33-85D3-1A125409A5DA@microsoft.com,
« PMO » <patrickPOINTmorangeAROBASElapostePOINTnet> a écrit :
Bonjour,
Voici une piste
'*****************
Private Sub UserForm_Initialize()
Me.TextBox1 = Year(Now)
End Sub
'*****************