Résultats de la recherche

Boisgontier, Avec ce nouveau code, le problème des 2 première ligne annoncé dans mon précédent post a disparu ! Cependant contrairement au fichier "essai" que vous m'avez transmis, de mon côté, si il n'y a pas de lien hypertexte en colonne F (donc colonne D vide) j'ai la même erreur d'exécution...

Merci Boisgontier, Avec le dernier code pour les liens hypertexte, j'ai systématiquement une "erreur d'exécution '-2147221014 (800401ea)' : impossible d'ouvrir le fichier" sur la ligne "f.Range("F" & ligne).Hyperlinks(1).Follow NewWindow:=True' .... mais juste sur les 2 premières lignes de la...

Merci Boisgontier, C'est parfait ! J'avais initialement une Listview et avec la listbox je ne parviens pas à adapter le bout de code qui me permettait d'accéder au document via un lien hypertexte directement depuis la listview (la listbox maintenant) j'ai systématiquement une erreur de...

Bonjour et merci Boisgontier, Il n'y a vraiment pas de possibilité d'ajouter un combobox2 pour faciliter la recherche ? pour faire une sorte de filtre de recherche multicritère dynamique. Les points d'entrée pour la recherche dans la base de données étant la discipline (environ 50) ET/OU le...

Bonjour, Je travail actuellement sur un formulaire de recherche permettant de rechercher des documents dans une base de donnée de plusieurs milliers de lignes. Pour cela 3 champs sont à renseigner : Disciplines, Bloc, mots clefs. Chacun des 3 champs peut être renseignés individuellement ou...

Bonjour, Quelqu'un pour m'aider à intégrer la fonction ci-dessous dans le code en début de discussion ? Function MajSansAccent(ByVal Chaine$) Const VAccent = "àáâãäåéêëèìíîïðòóôõöùúûü", VSsAccent = "aaaaaaeeeeiiiioooooouuuu" Dim Bcle& For Bcle = 1 To Len(VAccent) Chaine = Replace(Chaine...

Merci Victor21 A quel endroit de mon code dois-je "appeler" cette fonction en sachant que la recherche par mot clefs s'effectue dans la listview1 et pas dans la feuille. D'avance merci de ton retour

Bonjour le forum, J'ai besoin d'un petit coup de main, Je dispose d'un formulaire de recherche (UserForm1) permettent d’accéder à une base de données de plusieurs milliers de document et de pouvoir y accéder directement depuis le Userform en double-cliquant sur le lien.... bref La recherche...

Super ! Merci beaucoup Robert

Bonjour Robert et merci pour ton retour, Tu vas certainement trouver que je cherche la petite bête mais y a t'il un moyen de ne copier que la valeur (sans les formules) tout en gardant la mise en forme/format des cellules ? Je te joins un bout de fichier pour mieux comprendre. Merci

Bonjour, Quelqu'un pourrait-il m'aider à modifier la formule ci-dessous pour que le copier/coller se fasse sur les valeurs et non sur le contenu/formule ? Sub Synthèse() Dim Sh As Worksheet With Sheets("Synthèse") .[A2:J65536].Clear Application.ScreenUpdating = 0 For Each Sh In Worksheets If...

Super ! Merci beaucoup Jacky67 ! Je profite d'avoir un expert pour savoir s'il est possible de "vider" le textbox1 à chaque recherche. Je m'explique : Le combox1 permet de faire un premier filtre par discipline et le texbox1 une recherche par mot clef dans la liste view (filtrée par discipline...

Bonjour le forum, J'ai un soucis avec avec une macro de formulaire de recherche. La recherche par discipline (Cf. Doc. joint) est censée me lister l'ensemble des documents de la discipline. Seulement voilà, cela fonctionne pour toutes les disciplines sauf pour une : Le CVC qui me renvoi à une...

J'ai oublié de préciser que la cellule indiquée dans la msgbox "il n'y a pas de lien hypertexte en cellule...) ne correspond pas du tout à la ligne sélectionnée dans la listview.... c'est à y perdre son latin !

Oui effectivement, j'ai mis un peu d'ordre pour harmoniser tout ça ! Par contre, je suis en panique : Depuis ce matin, impossible d'ouvrir un document via le double clic dans la listview : à chaque fois la msgbox indique qu'"il n'y a pas de lien hypertextes en cellule $...." alors que le lien...

SUPER ! Il me reste juste un bug (débogage : erreur d'exécution 13 - incompatibilité de type pour la ligne ".ListItems(X).ListSubItems.Add , , Dis.Offset(0, i)) :") bizarrement, quand je tape le mot "plan" en mot clef, il n'aime pas du tout... pour les autres mots clefs (que j'ai testé) ça...

Je viens de trouver la manip pour une recherche par mot clef indifférentes majuscules/minuscule : "Option Compare Text" en tête de module et le tour est joué ! Par contre toujours pas d'idée lumineuse pour une recherche par mot clef en première intention sans passer par la saisie de la discipline

Parfait ! Merci beaucoup ! Juste un dernier point, est-il possible d'effectuer une recherche par mot clef sans saisie de la discipline ? et également sans prendre en compte les majuscules et les minuscules?

Trés bien ! cela fonctionne pour les liens. Je ne sais pas si tu avais remarqué, j'ai essayé de faire en sorte que les documents ayant un lien hypertexte apparaissent en rouge gras (ou autre) dans la listview (en effet certains documents n'auront pas de lien dans un premier temps), mais ça ne...

-