OVH Cloud OVH Cloud

Format et DateSerial

2 réponses
Avatar
Patrick Catarsi
Re-Bjr
QQ pourraist-il me dire comment se décline en VBA
Format et DateSerial

ListBox1.AddItem Format(DateSerial(2006, x, 1), "mmmm") me donne la réponse
en grisant Format "nombre d'arguments incorrect ou affectation de propriétés
incorrecte" .

2 réponses

Avatar
JB
Bonjour,

Private Sub UserForm_Initialize()
For m = 1 To 12
ListBox1.AddItem Format(DateSerial(2006, m, 1), "mmmm")
Next m
End Sub

Je n'ai pas de pb

JB
Avatar
Patrick Catarsi
Le 30/04/06 17:20, dans
, « JB »
a écrit :

Bonjour,

Private Sub UserForm_Initialize()
For m = 1 To 12
ListBox1.AddItem Format(DateSerial(2006, m, 1), "mmmm")
Next m
End Sub

Je n'ai pas de pb

JB

Merci de ta réponse, mais je suis en Mac et il doit y avoir une petite

différence, cela arrive souvent, j'essaye de la trouver c'est pourquoi je
cherche à comprendre comment cela fonctionne.
Patrick