1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Ca ne fonctionne pas
pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01
si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008"
merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
DanielCo
Bonjour, 1. pour les dièses, mets la date entre dièses : Cells.Find(What:=#1/1/2008#, After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate 2. Mets le format : "01/"mm/aaaa Cordialement. Daniel
Bonjour,
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate Ca ne fonctionne pas pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01 si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008" merci
Bonjour,
1. pour les dièses, mets la date entre dièses :
Cells.Find(What:=#1/1/2008#, After:¬tiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
_
MatchCase:úlse, SearchFormat:úlse).Activate
2. Mets le format :
"01/"mm/aaaa
Cordialement.
Daniel
Bonjour,
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:úlse, SearchFormat:úlse).Activate
Ca ne fonctionne pas
pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01
si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008"
merci
Bonjour, 1. pour les dièses, mets la date entre dièses : Cells.Find(What:=#1/1/2008#, After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate 2. Mets le format : "01/"mm/aaaa Cordialement. Daniel
Bonjour,
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate Ca ne fonctionne pas pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01 si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008" merci
Charabeuh
Bonjour Jean-Luc,
En supposant que les cellules contenant des dates sont au format date, on peut essayer ceci:
Pour avoir le premier jour du mois: Par formule: ÚTE(ANNEE(E5);MOIS(E5);1) (si date en E5)
jean-luc Guitard a émis l'idée suivante :
Bonjour,
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate Ca ne fonctionne pas pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01 si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008" merci
Bonjour Jean-Luc,
En supposant que les cellules contenant des dates sont au format date,
on peut essayer ceci:
Pour avoir le premier jour du mois:
Par formule: ÚTE(ANNEE(E5);MOIS(E5);1) (si date en E5)
jean-luc Guitard a émis l'idée suivante :
Bonjour,
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:úlse, SearchFormat:úlse).Activate
Ca ne fonctionne pas
pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01
si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008"
merci
Pour avoir le premier jour du mois: Par formule: ÚTE(ANNEE(E5);MOIS(E5);1) (si date en E5)
jean-luc Guitard a émis l'idée suivante :
Bonjour,
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate Ca ne fonctionne pas pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01 si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008" merci
michdenis
Bonjour,
En supposant que les dates recherchées dans la plage de cellules n'émanent pas de formules...mais d'une simple donnée.
MichD -------------------------------------------- "jean-luc Guitard" a écrit dans le message de groupe de discussion : 4d7239a4$0$5429$
Bonjour,
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate Ca ne fonctionne pas pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01 si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008" merci
Bonjour,
En supposant que les dates recherchées dans la plage de cellules n'émanent pas
de formules...mais d'une simple donnée.
MichD
--------------------------------------------
"jean-luc Guitard" a écrit dans le message de groupe de discussion : 4d7239a4$0$5429$ba4acef3@reader.news.orange.fr...
Bonjour,
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:úlse, SearchFormat:úlse).Activate
Ca ne fonctionne pas
pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01
si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008"
merci
MichD -------------------------------------------- "jean-luc Guitard" a écrit dans le message de groupe de discussion : 4d7239a4$0$5429$
Bonjour,
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate Ca ne fonctionne pas pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01 si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008" merci
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate Ca ne fonctionne pas pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01 si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008" merci
1 -avec ce bout de prg je cherche sur toute la feuille une date
01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:úlse, SearchFormat:úlse).Activate
Ca ne fonctionne pas
pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01
si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008"
merci
1 -avec ce bout de prg je cherche sur toute la feuille une date 01/01/2008
Cells.Find(What:="01/01/2008", After:¬tiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:úlse, SearchFormat:úlse).Activate Ca ne fonctionne pas pour être plus précis c'est sur une ligne allant de P4 à EE4
2- comment formater les dates pour que le jour soit toujours le 01 si j'ai Date="23/03/2008" je souhaites obtenir date="01/03/2008" merci