Bonjour a toutes et tous, Forum bonjour
Je récupère une date dans mon TextBox4 au format suivant 22/Oct/2013
je souhaiterai svp copier cette date dans ma feuil(Compte) en B27 également et excatement au mème format
j'ai modifier le format de la cellule mais je n'arrive pas a obtenir le bon format voulu dans ma cellule B27 malgré pleins d'essais
en fait ca copie sous ce format 22/10/2013 alors que je souhaite 22/Oct/2013 première lettre du mois en majuscule
Info: Ws = nom de ma feuil1 > (Compte)
En vous remerciant pour votre aide et pour votre temps
Bonne journée a tous
Cordialement Ray
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Private Sub MonthView1_DateClick(ByVal DateClicked As Date) UserForm1.TextBox4.Value = Application.Proper(Format(UserForm2.MonthView1.Value, "dd/mmm/yyyy")) DateExpiration = UserForm1.TextBox4.Value Ws.Range("B27") = DateExpiration Unload Me End Sub
Partager