cs_Papayaga
Messages postés22Date d'inscriptionlundi 25 octobre 2004StatutMembreDernière intervention 3 novembre 2006
-
2 nov. 2006 à 13:19
cs_Papayaga
Messages postés22Date d'inscriptionlundi 25 octobre 2004StatutMembreDernière intervention 3 novembre 2006
-
3 nov. 2006 à 18:32
Bonjour,
J'ai une date de référence (madate) issue d'une cellule d'une feuille F1. Je veux chercher si cette date existe dans une cellule d'une autre feuille F2, dans la colonne "C", quelque soit son format dans cette cellule.
Le programme ci dessous, très bien pour d'autres valeurs, ne repère pas certaines dates (PB de format, je suppose)
Public madate As Date
Public mavar As Integer
Dim LigDepart As Long, TrouveLe As Range
Sheets("F2").Activate
LigDepart = Cells(2, 3).Row
With ActiveSheet.Range("C" & LigDepart & ":C" & Range("C65536").End(xlUp).Row)
Set TrouveLe = .Find(madate, LookIn:=xlFormulas, SearchOrder:=xlByRows)
If Not TrouveLe Is Nothing Then
Cells(TrouveLe.Row, "C").Select
mavar = 1
Else
' MsgBox "Mot non trouvé", vbInformation
mavar = 2
End If
cs_MPi
Messages postés3877Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention17 août 201823 2 nov. 2006 à 21:34
Salut,
Tu ne pourras possiblement pas y arriver si les dates ne sont pas du
même format. Si les dates ne sont pas au format Date, elles sont
peut-être considérées comme du texte donc rien à faire.
Si les dates sont au format Date et qu'elles ne sont pas écrites de la
même façon (10-oct et 2006-10-10), ça devrait fonctionner. Tu pourrais
même y aller avec la Value des cellules plutôt que la Date des cellules.
Pour savoir si tes dates sont au bon format, enlève toute justification
des cellules. Les dates se retrouvent à droite, les textes se
retrouvent à gauche.
cs_Papayaga
Messages postés22Date d'inscriptionlundi 25 octobre 2004StatutMembreDernière intervention 3 novembre 2006 3 nov. 2006 à 18:32
Merci pour ta réponse,
Effectivement, la format de ma cellule est pesonnalisé sous la forme: jjjj j mmmm aaaa.
Mais dans la barre des formules d'Excel, la date est bien reconnue puisqu'elle apparaît sous a forme jj/mm/aaaa.
Je me rend compte que si dans une cellule, le format est jj/mm/aaaa et si je change le format en personnalisé jjjj j mmmm aaaa, ce dernier format ne devient effectif qu'en rentrant dans la cellule et en ressortant (sans changer de valeur)... Alors que le changement inverse (passer du format personnalisé au format date) se fait instantanément dans la cellule, sans aucune manoeuvre supplémentaire.
Dans tout les cas, rien ne change dans la barre des formules (toujours jj/mm/aaaa).
Que ma date de référence (madate) soit sous la forme jj/mm/aaaa (donc classique) ou jjjj j mmmm aaaa (donc personnalisée), le recherche fonctionne et trouve les dates au format personnalisé à condition que cette manoeuvre d'entrée-sortie de la cellule ait été effectuée. C'est curieux !!!