Modifier Date dans un Textbox

Résolu/Fermé
dudulleray - 14 nov. 2013 à 17:06
 dudulleray - 15 nov. 2013 à 07:49
Bonsoir a toutes et tous, Forum bonsoir



Excel 2007 VBA et Windows 7 32 bits

Le code ci-dessous m'affiche la date dans le format >> 15/Nov/2013 <<

Lorsque je modifie le code pour afficher dans le format >> 15 Novembre 2013 <<

de cette manière

.TextBox4.Value = Application.Proper(Format(UserForm2.MonthView1.Value, "dddd dd mmmm yyyy"))


j'ai une erreur d'exécution "13" incompatibilité de type


je ne comprends pas pourquoi, car lorsque je remets le code ci-dessous

Alors ca re-fonctionne bien ?????????

Merci beaucoup pour votre aide

bonne fin d'après midi a vous

Cdlt Ray


 With UserForm1


.TextBox4.Value = Application.Proper(Format(UserForm2.MonthView1.Value, "dd/mmm/yyyy"))

DateExpiration = .TextBox4.Value

Ws.Range("B27") = DateExpiration 'Stocke la Date d'Expiration sur la Feuil(Compte)= Ws

.TextBox2.SetFocus 'Sort de l'USF calendrier(MonthView1)et mis le focus sur le TextBox2

End With
A voir également:

2 réponses

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
14 nov. 2013 à 21:33
Bonjour,
Pourquoi un point devant TextBox ??
    TextBox4.Value = Application.Proper(Format(MonthView1.Value, "dddd dd mmmm yyyy"))
Fonctionne parfaitement
A+
1
Salut lermite222

Un point sinon j'ai une erreur de compilation etc etc

Par contre de cette manière ca fonctionne bien plus de plantage

.TextBox4.Value = Application.Proper(Format(UserForm2.MonthView1.Value, "dd mmmm yyyy"))

Merci pour ton aide, une bonne journée

Bon W-end a toi

Cordialement Ray
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
14 nov. 2013 à 21:39
Bonjour,

Peut être comme ça :

.TextBox4.Value = Application.Proper(Format(UserForm2.MonthView1.Value, "dd mmmm yyyy"))

;0)
1
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
Modifié par lermite222 le 14/11/2013 à 22:31
Bonjour Polux
dddd fait afficher le nom du jour.
Ca donne Jeudi 14 Novembre 2013
A+
0
Salut polux31

Merci pour ta réponse et pour le code

ça fonctionne bien plus de plantage sur mon fichier

.TextBox4.Value = Application.Proper(Format(UserForm2.MonthView1.Value, "dd mmmm yyyy"))

Merci beaucoup pour ton aide, une bonne journée a toi

Bon W-end

Cordialement Ray
0