Extraction d'un jour d'une date dans un tableau de date / VBA

[festina84]

Bonjour à tous,

Je souhaite extraire le jour (en chiffre), le mois (en chiffre), et l’année(en chiffre), d’un tableau de date. J’ai les bases fondamentales en algorithmiques mais VBA est un nouveau langage pour moi.

J’ai une série de date de la cellule A1 jusqu’à la cellule A19. J’ai fait rentrer ces dates dans un tableau de date grâce au code suivant :

Dim DateFacture(19) As Date
For i = 0 To 19 Step 1
DateFacture(i) = Worksheets(1).Cells(i + 1, 1)
Next i

C’est là que j’aimerai savoir s’il est possible d’extraire le jour d’un élément du tableau de date.
Par exemple, le premier élément du tableau est 04/03/1984 et je désirerai afficher 4 dans une msgbox. J'ai essayé plusieurs commandes du type:

Jour_extrait=Day.DateFacture(0)
Msgbox  Jour_extrait

Je pensais que ce code devait afficher 4 mais cela ne marche pas.
Quelqu’un connait-il la commande pour réaliser l’extraction ?

Merci pour votre aide

festina84

 

[Cousinhub]

Re : Extraction d'un jour d'une date dans un tableau de date / VBA

Bonsoir,

essaie avec cette syntaxe :

x = Day(DateFacture(0))
y = Month(DateFacture(0))
z = Year(DateFacture(0))

Bonne soirée

 

[festina84]

Re : Extraction d'un jour d'une date dans un tableau de date / VBA

Bonsoir bhbh,

Merci pour ta réponse.

Cette syntaxe marche très bien pour mon programme!!

Merci encore

Salut

Festina84