format date

buromania · 6 Octobre 2005

Bjr Forum
Le sésultat de ce filtre est mm/dd/yyyy

Feuil10.Activate
Range('K1').Select
ActiveCell.FormulaR1C1 = '=TODAY()'
Columns('D').Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:='<' & Range('k1').Text & '', Operator:=xlAnd

Comment modifier today en aujourdhui
Ou placer formulalocal ?

bonne jounée à tous

JeanMarie · 6 Octobre 2005

Bonjour

Essaye en remplaçant la ligne
ActiveCell.FormulaR1C1 = '=TODAY()'
par
ActiveCell.FormulaLocal = '=AUJOURDHUI()'

@+Jean-Marie

buromania · 6 Octobre 2005

Bjr Jean Marie et le Forum
Le résultat est identique
le filtre place le mois en premier
autre astuce?
Bonne journée

buromania · 6 Octobre 2005

Bjr Jean Marie et le Forum
Le résultat est identique
le filtre place le mois en premier
autre astuce?
Bonne journée

buromania · 6 Octobre 2005

re bonjour à tous

Il ft rajouter selection.numberformat ='general' et le filtre fonctionne normalement

format date

buromania

Guest

JeanMarie

XLDnaute Barbatruc

buromania

Guest

buromania

Guest

buromania

Guest

Discussions similaires