OVH Cloud OVH Cloud

Pb avec une macro pour remplacer !

3 réponses
Avatar
Lucio57
Bonjour,

Dans un fichier Excel je cherche à faire un ctrl + H afin de remplacer
toutes les dates non valides par rien

Lorsque je le fais manuellement en générant une macro auto cela marche bien

La macro générée est :

Cells.Replace What:="00/01/1900", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False


Si je copie cette macro dans mon code il ne me modifie rien du tout !

Il passe dessus sans réaction

D'où cela peut venir
D'avance merci de votre aide

3 réponses

Avatar
Patrick Fredin
Bonjour,

Je pense qu'avec du VBA il vaut mieux éviter cette fonction. je pense qu'il
plus efficace de passer sur chaque cellule avec une boucle, de tester son
contenu et de la vider si besoin.

--
Patrick

"Lucio57" wrote in message
news:
Bonjour,

Dans un fichier Excel je cherche à faire un ctrl + H afin de remplacer
toutes les dates non valides par rien

Lorsque je le fais manuellement en générant une macro auto cela marche
bien

La macro générée est :

Cells.Replace What:="00/01/1900", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse, SearchFormat:úlse, _
ReplaceFormat:úlse


Si je copie cette macro dans mon code il ne me modifie rien du tout !

Il passe dessus sans réaction

D'où cela peut venir
D'avance merci de votre aide


Avatar
twinley
Bonsoir,

Si tu as :
What:="00/01/1900",
c'est que c'est du texte et pas un format date.

--
à+twinley
"Lucio57" a écrit dans le message de
news:
Bonjour,

Dans un fichier Excel je cherche à faire un ctrl + H afin de remplacer
toutes les dates non valides par rien

Lorsque je le fais manuellement en générant une macro auto cela marche
bien


La macro générée est :

Cells.Replace What:="00/01/1900", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse, SearchFormat:úlse, _
ReplaceFormat:úlse


Si je copie cette macro dans mon code il ne me modifie rien du tout !

Il passe dessus sans réaction

D'où cela peut venir
D'avance merci de votre aide


Avatar
Pounet95
Bonsoir,
Ce qui ne marche pas à mon avis, c'est le "01/01/1900"
Remplace le par CDate(1) et ça marche !
Est-ce OK ?

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
"Lucio57" a écrit dans le message de
news:
Bonjour,

Dans un fichier Excel je cherche à faire un ctrl + H afin de remplacer
toutes les dates non valides par rien

Lorsque je le fais manuellement en générant une macro auto cela marche
bien

La macro générée est :

Cells.Replace What:="00/01/1900", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse, SearchFormat:úlse, _
ReplaceFormat:úlse


Si je copie cette macro dans mon code il ne me modifie rien du tout !

Il passe dessus sans réaction

D'où cela peut venir
D'avance merci de votre aide