Ne reconnaît pas les dates

[Linebaker]

Bonjour à vous tous,

Petit problème pour vous mais un gros pour moi

Lorsque j'active ma macro, Excel ne reconnaît pas les dates dans la cellule ?

Voici une partie de mon code :

Columns('K:L').Select
Selection.NumberFormat = 'dd-mm-yyyy'
Range('K45000').Select
Selection.NumberFormat = 'General'
ActiveCell.FormulaR1C1 = 'FIN'
Range('K1').Select
ActiveCell.FormulaR1C1 = '=RC[-8]&'' ''&RC[-7]&'' ''&RC[-6]&'' ''&RC[-5]&'' ''&RC[-4]&'' ''&RC[-3]&'' ''&RC[-2]'
Selection.Copy
Range('K2:k44999').Select
ActiveSheet.Paste
...
Do Until ActiveCell = 'FIN'
If ActiveCell.Value > Range('L2').Value Then ----> ne reconnaît seulement les cellules vides
ActiveCell.Offset(1, 0).Select
GoTo Efface

Merci de m'aider

 

[visiteur]

Bonjour Linebaker
essaye donc jj/mm/aaaa
cela viient peut être de la langue reconnue
Bon ap

 

[ChTi160]

Salut Linebaker
Bonjour Visiteur
Bonjour Le Forum

Voilà ce que j'ai modifié pour que la macro inscrive une date Format 30-12-2005
en partant de cela si j'ai bien compris la question Lol
3 0 12 2 0 0 5 -------->30-12-2005

Range('K1').Select
ActiveCell.FormulaR1C1 = '=RC[-8] & '''' & RC[-7]& ''-'' & RC[-6]&''-''& RC[-5]&''''& RC[-4]&''''& RC[-3]&''''& RC[-2]'
Selection.Copy
Bonne Journée

Message édité par: ChTi160, à: 23/06/2005 12:18