Vba : dd/mm/yyyy to Mercredi dd/mm/yyyy

Résolu/Fermé
ViriisXP Messages postés 482 Date d'inscription mardi 1 juin 2004 Statut Membre Dernière intervention 11 janvier 2023 - 11 juil. 2012 à 21:05
ViriisXP Messages postés 482 Date d'inscription mardi 1 juin 2004 Statut Membre Dernière intervention 11 janvier 2023 - 12 juil. 2012 à 19:31
Bonjour,
je passe une date en argument d'un usf vers une macro mais vba est méchant il me le met en anglais ! et je voudrais pouvoir mettre le jour qui y correspond également.


Merci à tous par avance ^^
cordialement.



A voir également:

2 réponses

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
12 juil. 2012 à 08:21
Bonjour,

Cette date vient d'ou et comment la passez vous en parametre??

Essayez ceci:

UF:
Private Sub CommandButton1_Click()
  Dim madate As Date
  
  madate = "12/02/2012"
  date_suite = madate + 12
  Call test_date(madate, date_suite)
End Sub


Module:
Sub test_date(sadate, sadate_suite)
  x = sadate
  y = Format(sadate, "dddd-dd-mmmm-yyyy")
  Z = sadate_suite
End Sub


A+
0
ViriisXP Messages postés 482 Date d'inscription mardi 1 juin 2004 Statut Membre Dernière intervention 11 janvier 2023 40
12 juil. 2012 à 19:31
Bonjour,
en fait j'ai passé : day = Format(day, "dddd d mmmm yyyy")

et ca passe ^^ :)

Merci beaucoup
0