Modifier Date dans un Textbox [Résolu/Fermé]

Signaler
-
 dudulleray -
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

2 réponses

Messages postés
8700
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 140
Bonjour,
Pourquoi un point devant TextBox ??
    TextBox4.Value = Application.Proper(Format(MonthView1.Value, "dddd dd mmmm yyyy"))
Fonctionne parfaitement
A+
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 63550 internautes nous ont dit merci ce mois-ci

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
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 148
Bonjour,

Peut être comme ça :

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

;0)
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 63550 internautes nous ont dit merci ce mois-ci

Messages postés
8700
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 140
Bonjour Polux
dddd fait afficher le nom du jour.
Ca donne Jeudi 14 Novembre 2013
A+
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