blackstrange
XLDnaute Nouveau
Bonjour,
Je souhaite dans une listbox ajouter la date du jour ainsi que les dates des 5 jours d'avant
j'ai fait une ébauche de code mais cela ne fonctionne pas
J'ai une erreur d'éxécution 381 .. pouvez-vous m'aider ? merci beaucoup
Je souhaite dans une listbox ajouter la date du jour ainsi que les dates des 5 jours d'avant
j'ai fait une ébauche de code mais cela ne fonctionne pas
Code:
Private Sub UserForm_Initialize()
Dim i As Integer
Dim DateJour As Date
For i = 0 To 5
DateJour = Format(LongDate - i, "dd mmmm yyyy")
ListeDates.List = DateJour(i)
Next i
End Sub
J'ai une erreur d'éxécution 381 .. pouvez-vous m'aider ? merci beaucoup