VBA convertir Date français / Anglais avec .format
Bonjour à tous,
Je sèche sur un petit truc et aurais besoin de votre aide :
J'ai dans un code vba pour générer un mail automatique via un bouton dans un UserForm
Application.Proper(Format(TextBox_DateLiv1.Value, "[$-409]Dddd d mmmm yyyy"))Ce qui me donne une date type " Mercredi 23 Octobre 2018"
Que changer ou rajouter dans mon code pour que cela me donne "Wednesday 23 October 2018" ou quelque chose de similaire ??
J'ai tester de rajouter
[$-409]mais ca ne change rien ...
Merci D'avance à celui qui pourra m'aider.
Nicolas
Bonsoir, a toi d'adapter
Cette macro convertit la date en Anglais et au format "Wednesday, 1 May 2016"
Sub test()
With Range(Cells(2, 8), Cells(19, 8))
.NumberFormat = "[$-409]dddd d mmmm yyyy"
End With
End Sub
Soit tu convertis dans une cellule fictive que tu récupères dans ton TextBox
Soit tu utilises
Textbox1_Change()Bonsoir et merci de ton aide ,
Avant de l’essayer, est ce que ta formule prend en charge le . Proper pout les majuscules en debut de mots ?
Merci 😊
Tu n'as plus besoin de
Application.WorkSheetFunction.ProperCar Par défaut, cette conversion est en Nom Propre.
Tu peux encore essayer un truc de ce genre :
Sub ConvertTBoxVal()
Dim ValTbx as Variant
ValTbx =Cdate(Me.TonTexbox.Value)
With Feuil1
.Cells(1,1).NumberFormat = "[$-409]dddd d mmmm yyyy"
.Cells(1,1)=ValTbx
End with
Me.TonTextBox.Text = Feuil1.Cells(1,1).Value
End Sub