VBA-CONVERTIR DATE TEXTE en FORMAT DATE !!

K

kjin

XLDnaute Barbatruc

• 27 Septembre 2010

• #2

Re : VBA-CONVERTIR DATE TEXTE en FORMAT DATE !!

Bonjour Celeda,

Code:

On error Resume next 'si A1 n'est pas une date
Range("A1") = CDate(Range("A1"))
On error goto 0

convertira le texte de A1 en date
A+
kjin

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 27 Septembre 2010

• #3

Re : VBA-CONVERTIR DATE TEXTE en FORMAT DATE !!

Re, bonjour Kjin

Peut être une autre colution comme ceci pour la colonne A :

Code:

    Columns("A:A").TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth, _
        FieldInfo:=Array(0, 4)

bon après midi
@+

 

Vote positif 0 Vote négatif

Celeda

XLDnaute Barbatruc

• 27 Septembre 2010

• #4

Re : VBA-CONVERTIR DATE TEXTE en FORMAT DATE !!

Bonjour,

Merci Kijin and Pierrot mais est-ce possible d'avoir la conversion en :

jj/mm/aaaa

au lieu de mm/jj/aaaa

Merci

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 27 Septembre 2010

• #5

Re : VBA-CONVERTIR DATE TEXTE en FORMAT DATE !!

Re,

si les données source sont exprimées ainsi "02/25/2010" :

Code:

    Columns("A:A").TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth, FieldInfo:=Array(0, 3)

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 27 Septembre 2010

• #6

Re : VBA-CONVERTIR DATE TEXTE en FORMAT DATE !!

Bonjour Celeda, kjin, Pierrot,

Une macro assez rapide (car avec tableau), proche du code de kjin :

Code:

Sub Convertir()
Dim d&, tablo, i&
d = [A65536].End(xlUp).Row
tablo = Application.Transpose(Range("A1:A" & d))
On Error Resume Next 'si toutes les valeurs ne sont pas des dates
For i = 1 To d
  tablo(i) = CDbl(CDate(tablo(i)))
Next
With [A1].Resize(d)
  .NumberFormat = "dd/mm/yyyy" 'ou autre format Date
  .Value = Application.Transpose(tablo)
End With
End Sub

A+

 

Vote positif 0 Vote négatif

Celeda

XLDnaute Barbatruc

• 27 Septembre 2010

• #7

Re : VBA-CONVERTIR DATE TEXTE en FORMAT DATE !!

Bonjour,

Merci beaucoup à vous trois,

cela marche impec

Sincérement votre

 

Vote positif 0 Vote négatif

Licha76

XLDnaute Nouveau

• 24 Novembre 2011

• #8

Re : VBA-CONVERTIR DATE TEXTE en FORMAT DATE !!

Je te remercie Pierrot mais pourrais tu m expliquer comment fonctionne la ligne de programmation ? Je souhaiterais comprendre

Merci encore ^^

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 24 Novembre 2011

• #9

Re : VBA-CONVERTIR DATE TEXTE en FORMAT DATE !!

Bonjour,

c'est l'équivalent de la conversion de données... touche de fonction F1 dans l'éditeur vba quand tu es sur le mot "TextToColumns" te donnera le détail des arguments de la méthode...

bon après midi
@+

 

Vote positif 0 Vote négatif