affichage date dans msgbox

[nrdz83]

Bonjour à tous j'utilise ce code pour l'affichage d'informations via in mesgbox

Dim message As String, boutons As Single, titre As String
message = " Vous allez établir la liste de travaux du " & Me.ComboBox1.Value & " Pour la période du " & CDate(Me.DTPicker1) & "  au  " & CDate(Me.DTPicker2)
boutons = vbInformation + vbOKOnly
titre = " Liste de travaux"
msgbox message, boutons, titre
End Sub

Mais mon format de date affiche ceci :

[/url][/IMG]

Est il possible d' afficher une date dans un message box ? sous ce format 28/01/2010?

Par avance merci à tous et bon week end

 

[Dull]

Re : affichage date dans msgbox

Salut nrdz83, le Forum

On ne le répèteras jamais assez nrdz83 😛

Met un exemple de ton fichier histoire de ne pas avoir à le refaire

Bonne Journée

 

[nrdz83]

Re : affichage date dans msgbox

Bonjour dull et le forum, désolé mais je pensais que les codes et image suffisait.
Voici un exemple joint, par avance merci,
amitiés
Cijoint.fr - Service gratuit de dépôt de fichiers

 

[Dull]

Re : affichage date dans msgbox

Ehbahvoilàmisterbean 🙂


met cette partie du code

Dim message As String, boutons As Single, titre As String
message = " Vous allez établir la liste de travaux du " & Me.ComboBox1.Value & " Pour la période du " & CDate(Me.DTPicker1) & "  au  " & CDate(Me.DTPicker2)
boutons = vbInformation + vbOKOnly
titre = " Liste de travaux"
msgbox message, boutons, titre

dans

[B]Private Sub ComboBox1_Change()[/B]
Dim message As String, boutons As Single, titre As String
message = " Vous allez établir la liste de travaux du " & Me.ComboBox1.Value & " Pour la période du " & CDate(Me.DTPicker1) & "  au  " & CDate(Me.DTPicker2)
boutons = vbInformation + vbOKOnly
titre = " Liste de travaux"
msgbox message, boutons, titre
[B]End Sub[/B]

Si ce n'est pas ce que tu attends soit plus explicite

Bonne Journée

 

[nrdz83]

Re : affichage date dans msgbox

re bonjour dull
ça y est j'ai trouvé mon erreur , c'est parce que je fermé l'userform trop tot, avant de faire afficher la mesgbox.
Merci pour l'aide bon week end