Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
J'ai un code qui lance la recherche, il suffit de renseigner la zone adéquate dans l'explorateur :
'Macro permettant de lancer une recherche Windows dans un répertoire défini
Sub OpenFindFile() '(Optional pFolder As String, Optional pFile As String, Optional pFindIn As String)
Set shellapp2 =...
Bonjour,
Mon code fonctionne.
Je cherche juste la commande permettant de faire une recherche avec option, pour accélérer la recherche sur le réseau local (voir copie d'écran ci-jointe).
J'ai cherché attentivement sur le net, et n'ai encore rien trouvé.
Cela m'étonnerait que ce ne soit pas...
...J'ai une définition publique de variables :
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As...
Bonjour,
Je voudrais lancer l'explorateur Windows avec l'option "documents" pour accélérer la recherche, en alliant VBA et Shell.
Je ne trouve pas la commande correspondante.
Merci pour votre aide.
Sub OpenFindFile() '(Optional pFolder As String, Optional pFile As String, Optional pFindIn As...