Discussion :

[plante.douce]

Bonjour

J'ai un formulaire vba avec des dates mais quand je tape la date dans une textbox et que je l'exporte il me la met en format anglais dans excel.

12/02/2006 devient 02/12/2006

Merci d'avance

[ouskel'n'or]

Tu dois formater ta date

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

LaDate = Format(cdate(TextBox.text),"dd mmmm yyyy")

A+

[plante.douce]

Excuse moi mais ta formule ou je dois la placer ? Car dans la textbox il me la refuse ?


merci désolé je débute

[jmfmarques]

juste avant l'exportation, pardi !

[plante.douce]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub CommandButton3_Click()
 Dim L As Integer
  Dim r As Range
  L = Sheets("Feuil1").Range("a65536").End(xlUp).Row
  Set r = Sheets("Feuil1").Range("a2:a" & L).Find(TextBox1)
  If r Is Nothing Then
    MsgBox ("Introuvable")
    LaDate = Format(cdate(TextBox.Text5),"dd mm yyyy") ' ???????????
Else
    r = TextBox1.Value
    r.Offset(0, 1) = TextBox2.Value
    r.Offset(0, 2) = TextBox3.Value

[plante.douce]

merci beaucoup ca marche