Faire une recherche vidéo dans une colonne

Fermé
vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017 - 28 janv. 2017 à 10:58
vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017 - 29 janv. 2017 à 18:47
Bonjour a tous, bonjour forum


Excel 2007 VBA

J'ai une liste de vidéos en colonne (A), et je souhaiterai effectuez une recherche par l'intermédiaire d'un (Input box) , je ne sais pas si c'est la meilleure chose, je verrai par la suite.

Le nom des vidéos peuvent commencer par un chiffre ou bien sur des lettres et titre en anglais.

Par contre je ne sais pas trop ce qui existe comme style de critères de recherche et comment se déroule l'affichage du résultat de la recherche.

Merci a vous de bien vouloir m'éclairer sur un code vba de recherche pour le mieux performant.

En vous souhaitant un très bon W-End

Cdlt VieuxRay
A voir également:

4 réponses

f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707
Modifié par f894009 le 28/01/2017 à 12:06
Bonjour Michel_M,

C'est notre bon vieuxray ou vieuxraymond avec son fichier "traitement liste Video".
Nombre de videos: 4000

un fichier que j'ai fait pour safach, en adaptant un code de vous (recheche communes) pour UserForm et modifie pour lui

https://www.cjoint.com/c/GAClfFvRiUf
3
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 302
Modifié par michel_m le 28/01/2017 à 13:58
Bonjour

Merci de citer la source (c'est rare sur CCM !..) et je plussoie (soit +2)

si on veut indiquer la famille et la désignation, il faudra que Raymond modifie

T_base = .Range("A2:A" & lig1).Value
en
T_base = .Range("A2:C" & lig1).Value
0
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707 > michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023
Modifié par f894009 le 28/01/2017 à 14:24
Re,
Merci de citer la source (c'est rare sur CCM !..)
Me parait normal de le faire
Oui, il y aura surement des modifs car il 'tartouilles" les noms de film en majscules, minuscules, les deux
A la limite je le fais maintenant
Pour
T_base = .Range("A2:C" & lig1).Value
, faut voir suivant

Fichier pour recherche maj/min

https://www.cjoint.com/c/GACnxtncIuf
0
vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017 > f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024
Modifié par vieuxraymond le 28/01/2017 à 15:24
Salut

Merci de citer la source (c'est rare sur CCM) et je plussoie encore

Si on veut indiquer la famille et la désignation, il faudra que Raymond modifie


Je ne comprends pas ce que tu veux dire par la phrase ci dessus

Sinon de tartouiller les noms de fichiers était au programme depuis le début
Pour la recherche autant qu'elle soit performante comme on y reviends pas

la liste de vidéos est en colonne A

merci vous pour l'aide

Cdlt Ray
0
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707 > vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017
Modifié par f894009 le 28/01/2017 à 16:29
Re,

Ben, recuperez le fichier du post 5, c'est pour vous!

Je ne comprends pas ce que tu veux dire par la phrase ci dessus
Vous, dans votre recherche, c'est le titre film qui vous interesse, mais le code d'origine est fait pour recuperer les infos en ligne sur le critere de recherche
0
vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017 > f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024
28 janv. 2017 à 17:52
Salut

Merci pour le fichier et pour la réponse

j'ai essayer le code et dans la liste il ni a pas de nom commençant par la lettre (Q ou q)

et je n'ai pas le message dans le cas ou il ne trouve pas la recherche demander

MsgBox "Aucune  " & Lettre & " dans la liste ", vbExclamation


merci a plus tard

Cdlt Ray
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 302
Modifié par michel_m le 28/01/2017 à 11:51
Bonjour,

Recherche sur combien de vidéo (environ) ?

une fois la video choisie, que faut il afficher ?

au besoin
Mettre le classeur sans données confidentielles en pièce jointe sur « mon-partage.fr »
et faire un clic droit-coller le raccourci dans votre message

Dans l’attente

 Michel
1
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707
29 janv. 2017 à 09:04
Bonjour,
Ok, mais vous n'avez pas fait cet que je demande, un fichier avec les noms de films ou Q ou q n'est pas trouve (j'espère que ce n'est pas une histoire d'un espace devant le nom)

Pour couper court, je regarde la chose de façon a trouver ce qui est trouvable peut importe l'écriture

Par contre
(6) avec des é è ë ê € etc etc
Trouvez moi un film ou il y a € ou ë voir pire encore dans le nom?
0
vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017
29 janv. 2017 à 11:33
Salut

Merci pour la réponse,

Dans les titres de films on peux trouver toutes lettres, chiffres, et signes divers.

Le père noël est une ordure
Cent mille dollar$ au soleil
La maison dans la forêt
ça va faire mal
saints & soldiers 3 le sacrifice des blindés.avi
le navire fantôme
Quand la terre s'arrètera

etc etc etc

recherche et trouver ce qui est trouvable peut importe l'écriture 


voila ça me parait judicieux

Merci et un bon dimanche

Cdlt Raymond
0
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707 > vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017
29 janv. 2017 à 12:13
Re,

voila ça me parait judicieux
Oui, mais la il faudra peut-etre entrez les caracteres comme il sont dans le titre

Vous ne recuperez pas de films russes, bulgares indonesiens ou chinois ?
0
vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017 > f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024
29 janv. 2017 à 12:21
Salut


Vous ne recuperez pas de films russes, bulgares indonesiens ou chinois

non non pas du tout,

Merci et bon appétit

Raymond
0
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707 > vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017
29 janv. 2017 à 13:28
Re,

essayez avec ce fichier:
https://www.cjoint.com/c/GADmCowiTOf
0
vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017
29 janv. 2017 à 14:57
Re

Merci pour le fichier,

Moi ca me convient bien comme ça, ca fait déjà un bon moyen de recherche
et en plus c'est rapide.

Par contre j'ai vu que l'on affichait le résultat de la recherche dans un Listbox
dans la colonne(1)

Serait t'il possible d'afficher dans la colonne(2) du listbox
l'index où le(s) numéro(s) du film correspondant

Ex:

colonne 1 | colonne 2

40 days and 40 nights | 412
Quand la terre s'arrètera | 78

les chiffres ne sont pas bons, c'est juste pour exemple

Je te remercie, bonne après midi.

Cdlt Ray

LstB_Design.ColumnCount = 2
LstB_Design.ColumnWidths = "200;0"
0
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707
Modifié par f894009 le 29/01/2017 à 17:41
Re,

le(s) numéro(s) du film correspondant
Qu'est-ce que vous entendez par numero, la ligne ou .... ??????
0
vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017 > f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024
29 janv. 2017 à 17:52
Salut

Je pense que c'est a l'index du film ou son numéro ??

le numéro de sa place dans la liste

si dans la liste le film Armagédon est en premier
si dans la liste le film Zonzon est le 1455

donc affichage dans listbox
colonne 1 = Armagédon colonne 2 = 1

Armagédon | 1
Zonzon | 1455

merci

Raymond
0
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707 > vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017
Modifié par f894009 le 29/01/2017 à 17:56
Re,

Ok, fichier modifie: https://www.cjoint.com/c/GADq4HG2Ktf
0
vieuxraymond Messages postés 24 Date d'inscription mardi 24 janvier 2017 Statut Membre Dernière intervention 29 janvier 2017 > f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024
29 janv. 2017 à 18:47
Salut f894009,

Alors c'est bon pour moi, je vais adapter demain a mon programme.

Je te remercie pour ton aide et ta patience mais ce n'ai pas toujours facile
de bien expliquer ce que l'on veux et je comprends bien aussi que ce n'ai pas facile pour vous non plus.

Je te souhaite la bonne soirée avec un grand grand et grand merci.

Baht alors a bientôt, sans aucun doute.

Bien cordialement VieuxRaymond
0