45 votes

Empêcher l'apparition du volet de recherche dans Microsoft Office

Comment empêcher l'apparition du volet de recherche dans Microsoft Office, par exemple lorsque je suis en train de tenir un ordinateur. Alt et cliquer quelque part dans un courriel dans Outlook ?

Cela n'est pas intentionnel et se produit généralement lorsque je passe d'une fenêtre à l'autre à l'aide de la touche Alt, ce qui provoque un retard pénible. Est-il possible de le désactiver ?

enter image description here
cliquer pour agrandir

42voto

Jon Peltier Points 4123

Après avoir moi-même lutté contre ce problème pendant des années, j'ai trouvé la réponse.

Dans Word, appuyez sur Alt-F11 pour ouvrir l'éditeur VB.

Appuyez sur Ctrl-G pour ouvrir la fenêtre immédiate.

Tapez cette ligne et appuyez sur Entrée :

Application.CommandBars("Research").Enabled = False

Notez que rien ne semble se passer, mais vous pouvez fermer l'éditeur VB et Word. La prochaine fois que vous ouvrirez Outlook, la fonction devrait être désactivée.

10voto

Brandon Points 2580

Malheureusement, la réponse est "Non, cela ne peut pas être désactivé".

Les gens se posent cette question depuis un certain temps déjà (voici quelques exemples remontant à 2007) :

Vous devrez probablement mettre au point quelque chose de compliqué pour piéger les touches en utilisant AutoHotkey ou AutoIt ou autre.

Il y a deux choses que l'on peut essayer de faire pour s'en accommoder :

  • Supprimez toutes les entrées des options de recherche et assurez-vous qu'il n'essaie pas d'accéder à des services de recherche basés sur le réseau (afin qu'il s'ouvre au moins rapidement).
  • Laisser le volet ouvert en permanence (il suffit de le réduire un peu, ou de le désarrimer et de le cacher dans un endroit hors de portée).

Ce n'est pas la réponse que vous attendez, j'en suis sûr, mais c'est les pour autant que je puisse en juger.

4voto

Pete Points 41

J'ai pu désactiver le mien en ouvrant le menu des options d'Outlook (Fichier > Options). Descendez ensuite dans le sous-onglet Compléments.

Une fois dans le menu des compléments, allez en bas de la page où il est indiqué "Gérer [les compléments COM]" et cliquez sur le bouton "Aller". Décochez la case située à côté de "Business Connectivity Services Add-In", puis cliquez sur OK.

Cela devrait empêcher l'ouverture du volet de recherche.

3voto

enderland Points 1888

Vous pouvez également le faire dans Outlook via VBA. Office 2010 ne permet plus de supprimer la plupart de ces solutions.

Word, PowerPoint et Excel vous permettent d'utiliser cette solution facile .

Outlook nécessite plus d'efforts car il utilise à la fois des explorateurs et des inspecteurs, qui dans des contextes différents à la fois ont cette barre de commande activée. La solution est donc en deux parties.

La première partie est consacrée à la mise en place WithEvents pour gérer la création de chaque nouvel inspecteur. Généralement, ces inspecteurs sont créés à chaque fois que vous ouvrez un message/événement/etc, et ils sont créés/détruits à chaque fois. Ainsi, même si vous touchez tous les inspecteurs actuels, les nouveaux inspecteurs n'auront pas la barre de commande désactivée.

Dans votre éditeur VBA (Alt+F11), insérez ce qui suit dans ThisOutlookSession. Chaque nouvel inspecteur (et explorateur aussi, bien que je n'aie pas encore créé d'explorateur) verra sa barre de commande désactivée.


Public WithEvents colInspectors As Outlook.Inspectors
Public WithEvents objInspector As Outlook.Inspector
Public WithEvents colExplorers As Outlook.Explorers
Public WithEvents objExplorer As Outlook.Explorer

Public Sub Application_Startup()
    Init_colExplorersEvent
    Init_colInspectorsEvent
End Sub
Private Sub Init_colExplorersEvent()
    Set colExplorers = Outlook.Explorers
End Sub

Private Sub Init_colInspectorsEvent()
    'Initialize the inspectors events handler
    Set colInspectors = Outlook.Inspectors

End Sub

Private Sub colInspectors_NewInspector(ByVal NewInspector As Inspector)
    Debug.Print "new inspector"
    NewInspector.commandbars("Research").Enabled = False
    'This is the code that creates a new inspector with events activated
    Set objInspector = NewInspector
End Sub
Private Sub colExplorers_NewExplorer(ByVal NewExplorer As Explorer)
    'I don't believe this is required for explorers as I do not think Outlook
    'ever creates additional explorers... but who knows
    Debug.Print "new explorer"
    NewExplorer.commandbars("Research").Enabled = False
    'This is the code that creates a new inspector with events activated
    Set objExplorer = NewExplorer
End Sub

Cependant, cela ne fera disparaître le menu que dans certaines vues d'Outlook. Vous devrez toujours exécuter la macro suivante pour le supprimer de tous les explorateurs. D'après ce que j'ai pu constater, ce problème persiste lorsque vous fermez/ouvrez Outlook :

Private Sub removeOutlookResearchBar()

    'remove from main Outlook explorer
    Dim mExp As Explorer
    For Each mExp In Outlook.Explorers
        mExp.commandbars("Research").Enabled = False
    Next mExp

End Sub

2voto

Miky Dinescu Points 263

Essayez ceci :

Ajout/Suppression de programmes ---> Microsoft Office ---> Ajout/Suppression de fonctionnalités ---> développer Office Tools ---> désactiver Research Explorer Bar

source

SistemesEz.com

SystemesEZ est une communauté de sysadmins où vous pouvez résoudre vos problèmes et vos doutes. Vous pouvez consulter les questions des autres sysadmins, poser vos propres questions ou résoudre celles des autres.

Powered by:

X