Force format date dans un combox (Résolu)

Cougar · 6 Mars 2014

Bonsoir le forum,

J'ai un combobox qui est alimenté par les colonnes E à Z. L'entête, qui est en format date en format yyyy/mm/dd, alimente mon combobox.

Le problème est que le format date du combobox est anglais mm/dd/yyyy.

Comment obliger l'afficharge des dates dans le combobox au format dd/mmm/yyyy ?

Voir le fichier joint.

Merci

Roland_M · 6 Mars 2014

Re : Force format date dans un combox

bonsoir,

j'ai essayé mais le soucis c'est que la macro ne déclenche pas !?

Cougar · 6 Mars 2014

Re : Force format date dans un combox

Bonsoir à tous,

C'est corrigé, mille excuses.

Merci

Roland_M · 7 Mars 2014

Re : Force format date dans un combox

bonjour,

chez moi tout est ok !?

sinon j'ai essayé comme ceci, à voir !?
un conseil, utiliser If IsDate(.Cells(1, i)) ...

Code:

' SOIT:
With Sheets("Feuil1")
  For i = 5 To 30
   If IsDate(.Cells(1, i)) Then ComboBox1.AddItem Format(.Cells(1, i), "dd/mm/yyyy")
  Next i
End With

'OU:
Dim Dat As Date
With Sheets("Feuil1")
  For i = 5 To 30
   If IsDate(.Cells(1, i)) Then
    Dat = .Cells(1, i): ComboBox1.AddItem Dat
  Next i
End With

Cougar · 7 Mars 2014

Re : Force format date dans un combox

Bonjour Roland_M, le forum,

J'ai pris ta première solution.

Merci

Force format date dans un combox (Résolu)

Cougar

XLDnaute Impliqué

Pièces jointes

Roland_M

XLDnaute Barbatruc

Cougar

XLDnaute Impliqué

Roland_M

XLDnaute Barbatruc

Cougar

XLDnaute Impliqué

Discussions similaires