Comment faire en sorte que les rappels du calendrier Outlook restent au premier plan dans Windows 7
J’ai eu le même problème avec Outlook 2010. Utilisez les étapes mentionnées ci-dessous, cela fonctionne parfaitement. N’oubliez pas d’activer toutes les macros : Centre de gestion de la confidentialité > Paramètres des macros.
-
Créez un certificat numérique pour plus tard : cliquez sur Démarrer et tapez ‘certificat’, sélectionnez ‘Certificat numérique pour les projets VBA’
-
Entrez un nom pour votre certificat. Cliquez sur OK. Ouvrez Outlook et appuyez sur Alt + F11 pour démarrer l’éditeur VBA.
-
Dans l’arborescence à gauche, développez ‘Objets Microsoft Office Outlook’ et double-cliquez sur ‘ThisOutlookSession’
Collez ce code :
Private Declare PtrSafe Function FindWindowA Lib "user32" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare PtrSafe Function SetWindowPos Lib "user32" ( _
ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _
ByVal X As Long, ByVal Y As Long, ByVal cx As Long, _
ByVal cy As Long, ByVal wFlags As Long) As Long
Private Const SWP_NOSIZE = &H1
Private Const SWP_NOMOVE = &H2
Private Const FLAGS As Long = SWP_NOMOVE Or SWP_NOSIZE
Private Const HWND_TOPMOST = -1
Private Sub Application_Reminder(ByVal Item As Object)
Dim ReminderWindowHWnd As Variant
On Error Resume Next
ReminderWindowHWnd = FindWindowA(vbNullString, "1 Reminder")
SetWindowPos ReminderWindowHWnd, HWND_TOPMOST, 0, 0, 0, 0, FLAGS
End Sub
Signez la macro pour qu’elle s’exécute : Outils > Signature numérique… et choisissez le certificat que vous avez créé précédemment
-
Fermez la fenêtre VBA
-
Activez toutes les macros dans Fichier > Options > Centre de gestion de la confidentialité > Paramètres du Centre de gestion de la confidentialité > Paramètres des macros