Forcer une Date

Question

Bonjour,


Voilà j'ai un probléme de date : excel inverse les jours et les mois...

J'aimerais alors forcée les date en jj/mm/aaaa hh:mm

quelle est le code pr cela ??

CDate(Cells(1, 1).Value) ...


Merci

Utilisateur anonyme · Answer

b tu te créé une fonctionne en VBA qui te convertit toute les dates

hani_ · Answer

Private Sub TextBox3_Change()
    Dim Exemple As String
    Dim ExDate As String
    Exemple = TextBox3.Value
    If ((Len(Exemple) > 5) And (Len(Exemple) < 10)) Then
        Application.EnableEvents = False
        ExDate = Mid(Exemple, 1, 2) & "-" & Mid(Exemple, 3, 2) & "-20" & Mid(Exemple, 5)
        TextBox3.Value = ExDate
        Application.EnableEvents = True
    End If
End Sub

a peu pret

jijudu · Answer

OK merci, mais moi c'est des cellules pas des textbox

lermite222 · Answer

Bonjour,
Dans le format des cellules
Personnaliser >> jj/mm/aaaa
A+

Forcer une Date

4 réponses

Discussions similaires

Newsletters