RESOLU : format date depuis un userform vers excel

Pierrot93

XLDnaute Barbatruc

• 26 Mai 2015

• #2

Re : format date depuis un userform vers excel

Bonjour,

essaye ceci :

Code:

Cells(1, 1) = CDate(Replace(TextBox1, "-", "/"))

bonne journée
@+

 

Vote positif 0 Vote négatif

exene

XLDnaute Accro

• 26 Mai 2015

• #3

Re : format date depuis un userform vers excel

Bonjour,

Peut être comme cela

Cells(1, 1) = Format(CDate(Me.TextBox1), "ddd dd mm yyyy")

Cliquez pour agrandir...

@ plus

 

Vote positif 0 Vote négatif

T

tany

XLDnaute Occasionnel

• 26 Mai 2015

• #4

Re : format date depuis un userform vers excel

Les deux fonctionnent impec !
heureusement que les copains sont là !
merci infiniment à tous deux.

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 26 Mai 2015

• #5

Re : format date depuis un userform vers excel

bonjour à tous,

comme ceci:

Code:

Private Sub CommandButton1_Click()
If IsDate(TextBox1) Then
   Cells(1, 1) = Left(Format(TextBox1, "dddd"), 3) & " " & Format(TextBox1, "dd mmm yyyy")
  'ou
  'Cells(1, 1) = Format(TextBox1, "ddd dd mmm yyyy")
End If
End Sub

EDIT: on s'est croisé !?

 

Dernière édition: 26 Mai 2015

Vote positif 0 Vote négatif

T

tany

XLDnaute Occasionnel

• 26 Mai 2015

• #6

Re : format date depuis un userform vers excel

Merci également à Roland_M
ça va aussi bien... j'ai le choix LOL
bonne journée à tous

 

Vote positif 0 Vote négatif