Problème de date

[Sarah]

Bonjour le forum

Comment faire pour modifier les dates suivantes
04.07.2005
27.06.2005
01.08.2005
01.07.2005

De tel manière qu'on puisse les exploiter par la suite avec excel. (jj/mm/aa)
J'aimerai réaliser cette tache à l'aide d'une macro.

Merci d'avance

 

[Abel]

Bonjour Sarah, le forum,

Si la zone où tu dois faire le remplacement est sélectionnée, essaie :

For Each c In Selection
c.Value = Replace(c, '.', '/')
Next c

Abel.

 

[Sarah]

Re bonjour

Ca fonctionne en partie.

Pour toutes les dates ou le chiffre représentant le jour est > à celui du mois, il n'y a aucun problème mais pour les autres il m'inverse le mois et les jours.

Par exemple:
11.12.2004 va se changer en 12/11/2004

08.03.2004 va se changer en 08/03/2004 donc OK.

Merci

 

[Abel]

Re,

J'ai déjà eu ce problème.
Ce n'est pas si le mois > jour mais si le jour >12.

Je regarde.

Abel.

 

[Sarah]

Re abel.

J'attend avec impatiance ton aide

Merci d'avance

 

[Abel]

Re,

Je viens de constater un truc.
Va comprendre Charles ...

Si quelqu'un a une explication, je suis preneur.

Ce code fonctionne (en tous cas en mode pas à pas).

For Each c In Selection
c.Value = Replace(c, '.', '/')
c.Value = Replace(c, '.', '/')
c.Value = Format(c.Value, 'mm/dd/yyyy')
Next c

Le premier 'Replace' remplace les points par des slash (normal, c'est ce qu'on lui demande).

Le deuxième 'Replace' remet dans l'ordre les jours et les mois (c'est là que c'est rigolo ..)

Le format, c'est pour les jours > 12 où la date n'est plus de la date mais du texte. Ca remet en format date.


Abel.

Message édité par: Abel, à: 17/01/2006 12:42

 

[Sarah]

Merci beaucoup Abel ça fonctionne parfaitement

 

[PascalXLD]

Bonjour

avez-vous essayé

For Each c In Selection
c.Value = cdate(Replace(c, '.', '/'))
Next c

Bon courage

 

[Abel]

Re,

Rhôôô, bon, d'accord ....

Salut Pascal. Tu vas bien ? ...

Abel.

 

[PascalXLD]

Re

Très bien et toi ??

Et oui j'ai pas mal galéré pendant un temps avec ces problèmes de jour inferieur à 12 donc je commence à avoir de vieux reflexes avec les dates

 

[Sarah]

Merci beaucoup à tous les deux