vba : dd/mm/yyyy to Mercredi dd/mm/yyyy Résolu

Question

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.


Configuration: Windows 7 / Safari 536.11

f894009 · Answer

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+

ViriisXP · Answer

Bonjour, 
en fait j'ai passé : day = Format(day, "dddd d mmmm yyyy") 

et ca passe ^^ :)

Merci beaucoup

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

2 réponses

Discussions similaires

Newsletters