Bonjour à tous.

Je viens interroger le forum pour savoir si comme moi vous avez un comportement anormal en utilisant la fonction date.

L'environnement de travail. J'utilise un Macbook Air de 2014. Je suis sous Yosemite 10.10.2, j'utilise Office pour mac 2011.

Le comportement. Dans UserForm j'introduis un TextBox1 et un CommandButton1 et dans l'UserForm le programme suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
Private Sub CommandButton1_Click()
    Cells(1, 1) = TextBox1
    End
End Sub
 
Private Sub TextBox1_Enter()
    TextBox1 = Date
End Sub
À l'exécution du programme, il s'affiche dans le Texbox1 " 14/02/ ", et dans la cellule A1 "14/02/"

Même résultat avec la ligne ci-dessous
Code : Sélectionner tout - Visualiser dans une fenêtre à part
TextBox1 = DateSerial(Year(Date), Month(Date), Day(Date))
Avez-vous le même problème que le mien ?

Une solution est d'ajouter l'année après la fonction " date ".
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Private Sub TextBox1_Enter()
    TextBox1 = Date & Year(Date)
End Sub
le résultat devient celui attendu ; dans le Textbox1 il s'affiche "14/02/2015" ainsi que dans la cellule A1.

Merci de me répondre.

JF Zuinghedau