Bonjour,
De ma page d'accueil j'ai crée un bouton qui ouvre un formulaire avec une fenêtre de recherche.
La recherche se fait bien dans le champ que je souhaite puisque c'est le premier de mon ordre de tabulation mais quelques fois je dois rechercher dans d'autres champs et donc cliquer sur le champ en question et faire suivant pour rechercher ou bien sélectionner regarder dans document actif.
De plus ma recherche principale sont des dossiers qui peuvent finir par -1 ou -2 ou pas de tirait donc systématiquement je sélectionne n'importe ou dans le champ à la place de champ entier
Je suis plus macro que vba mais je m'adapterai :-)
Voici la conversion de la macro au click de mon bouton
Comment faire la même avec directement le document actif dans "regarder dans" et le n'importe ou dans le champs dans "ou" ?
Et je suis preneur également d'un code qui me permettrait de trouver quand même le dossier même s'il y a un espace à la fin du dossier tapé dans le champ recherche( très souvent le cas lors des copier/coller) .
Merci
Bonne journée
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24 Function Macro5() On Error GoTo Macro5_Err With CodeContextObject On Error Resume Next DoCmd.GoToControl Screen.PreviousControl.Name Err.Clear DoCmd.RunCommand acCmdFind If (.MacroError <> 0) Then Beep MsgBox .MacroError.Description, vbOKOnly, "" End If End With Macro5_Exit: Exit Function Macro5_Err: MsgBox Error$ Resume Macro5_Exit End Function
Partager