Discussion :

[Denis_67]

Bonjour,

J'ai un souci de recherche sur une valuer constituée d'une date et d'un identifiant d'équipe.

Je saisi une date et une equipe, je sauvegarde les valeurs date equipe et j'ai créé une colonne "clé" où je concatene la date et l'équipe.

J'ai donc des valeurs du stile

24/05/2019matin
24/05/2019soir
24/05/2019nuit

Mais je n'arrive pas à stabiliser mon code soit il sonsidère le N° de série de la date, soir il ne m'autorise pas à concatener un format date et une string.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Valeur_Cherchee = CDbl(MaWs_TRG.Range("BA2")) & Rlt_Txt
'ou 
Valeur_Cherchee = MaWs_TRG.Range("BA2") & Rlt_Txt
 
Set PlageDeRecherche = MaWs_VALE.Columns(1)
Set Adresse_Val = PlageDeRecherche.Cells.Find(what:=Valeur_Cherchee, LookAt:=xlWhole)

Selon les cas, j'ai une erreur d'incompatibilité de tpe sur le concatenate.
Sachant que ma vairable de recherche cherche sur deux jours consécutif, donc j'ai une seconde boucle ou j'ai date +1
Auriez vous une recommendation sur ce genre de besoin.
Merci
Denis

[marot_r]

Bonjour.

Je testerai

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
if isdate(MaWs_TRG.Range("BA2").value) then
   Valeur_Cherchee = format(MaWs_TRG.Range("BA2").value, "dd/mm/yyyy") & Rlt_Txt
end if

A+

[Philippe Tulliez]

Bonjour,

Je saisi une date et une equipe, je sauvegarde les valeurs date equipe et j'ai créé une colonne "clé" où je concatene la date et l'équipe.

Si tu créais une clé alphanumérique en inversant la date (AAMMJJ & Equipe), non seulement ta recherche serait plus simple mais en plus, tu pourrais obtenir un tri par date + équipe simplifié

[Denis_67]

Merci pour vos réponses,

J'étais un peu fatigué vendredi !

Donc j'utilise un test if is date pour m'assurer de la bonne saisie
et ensuite je transforme en format américain comme suggéré par Philippe.
Je clos.

[marot_r]

Bonjour

format américain

AAMMJJ n'est pas le format américain, c'est le format inversé.
Le format américain (ou anglais) est MMJJAA.

A+

[Philippe Tulliez]

Bonjour,

Donc j'utilise un test if is date pour m'assurer de la bonne saisie
et ensuite je transforme en format américain comme suggéré par Philippe.
Je clos.

Ce n'est pas tout à fait ce que je voulais exprimer
En lisant une de tes explications

Je saisi une date et une equipe, je sauvegarde les valeurs date equipe et j'ai créé une colonne "clé" où je concatene la date et l'équipe.
J'ai donc des valeurs du stile
24/05/2019matin
24/05/2019soir
24/05/2019nuit

Je proposais de construire une clé avec date renversée soit en imaginant les dates en colonne B (en commençant en B2) et le nom (matin, soir) en colonne C (1ère en C2)
soit en A2, la formule

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=TEXTE(B2;"AAMMJJ") & C2

qui est une concaténation de la date inversée (B2) et de la valeur contenue en C2
ainsi la recherche s'effectue à l'aide d'une chaîne de caractères

[Denis_67]

Oui c'est bien ce principe que j'ai utilisé Philippe.
Merci encore.

Et merci à Marot pour la précision horlogère