Note: The other languages of the website are Google-translated. Back to English

Як змусити нагадування Outlook з’являтися зверху під час використання комп’ютера?

Поки ви працюєте в інших програмах або на веб-сайтах і зводите вікно Outlook до мінімуму, ви можете пропустити деякі нагадування в Outlook. Отже, як змусити нагадування Outlook з’являтися завжди у верхній частині екрана під час використання комп’ютера для відхилення нагадувань? У цій статті я представляю код VBA для його обробки.

Зробіть нагадування Outlook спливаючими у верхній частині екрана


Зробіть нагадування Outlook спливаючими у верхній частині екрана

1. прес Alt + F11 клавіші, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. Двічі клацніть на ThisOutlookSession від Project1 панелі, скопіюйте та вставте код нижче в скрипт.

VBA: Зверху з’являються нагадування

Private Sub Application_Reminder(ByVal Item As Object)
'UpdatebyExtendoffice20180418
Dim xAppointment As AppointmentItem
If Item.Class = olAppointment Then
    Set xAppointment = Item
    MsgBox xAppointment.Subject, 4096 + vbInformation + vbOKOnly, "Kutools for Outlook"
End If
End Sub

нагадування про документ зверху 1

3. Збережіть і закрийте Microsoft Visual Basic для додатків вікна.

Тепер, навіть якщо Outlook згорнутий, нагадування з’являться у верхній частині екрана, поки ви працюєте в інших програмах.
нагадування про документ зверху 2


Kutools для Outlook - приносить 100 розширених функцій для Outlook і значно полегшує роботу!

  • Авто CC / BCC за правилами при відправці електронної пошти; Автоматичне пересилання вперед Кілька електронних листів на замовлення; Автовідповідь без сервера обміну та більше автоматичних функцій ...
  • Попередження BCC - показати повідомлення при спробі відповісти всім якщо ваша поштова адреса є у списку BCC; Нагадати про відсутність вкладеньта інші функції нагадування ...
  • Відповісти (Усі) з усіма вкладеннями в поштовій розмові; Відповісти на багато електронних листів за секунди; Автоматично додавати привітання при відповіді; Додати дату в тему ...
  • Інструменти вкладення: Керування всіма вкладеннями у всіх листах, Автоматичне від'єднання, Стиснути все, Перейменувати все, Зберегти все ... Швидкий звіт, Підрахувати вибрані листи...
  • Потужні небажані електронні листи за звичаєм; Видаліть повторювані листи та контакти... Дозвольте вам робити розумніші, швидші та кращі в Outlook.
постріл kutools outlook kutools вкладка 1180x121
постріл kutools outlook kutools плюс вкладка 1180x121
 
Коментарі (5)
Поки немає оцінок. Оцініть першим!
Цей коментар був мінімізований модератором на сайті
як це можна використовувати для завдань, на відміну від призначень?
Цей коментар був мінімізований модератором на сайті
Щиро дякую – це зводило мене з розуму, я пропускав важливі зустрічі/завдання, пов’язані з часом, тому що мої нагадування НЕ відображаються зверху. Читаючи всі теми про це, я показую, що MS насправді не хвилює, що вони взагалі це змінили. Тепер я отримую спливаюче вікно з нагадуванням, і коли я натискаю його, мене переносить на панель нагадувань MS - просто чудово! Одне запитання, чи є шанс, що спливаюче вікно може бути іншого кольору, ніж синій? Мені хотілося б яскраво-рожевого, червоного чи зеленого, щоб нагадування кричало мені в обличчя, лол.
Цей коментар був мінімізований модератором на сайті
Я зіткнувся з подібними проблемами,

Я так часто стикаюся з цим, що написав просту програму під назвою OutlookRemindersOnTop, яка постійно відображатиме вікно нагадувань угорі, а також показуватиме сповіщення Windows, якщо знайде вікно

Сподіваюся, це допоможе, і для мене це чудово працює, якщо це допоможе, ви можете завантажити його з
https://1drv.ms/f/s!AmaHAXM9ZhPhaYN972FkhyTLHO8

для цього потрібен .net 4.5 або 4.0, я можу перекомпілювати його до 2.0, якщо є інтерес.


Сподіваюся, що це допомагає
Цей коментар був мінімізований модератором на сайті
Наданий VBA не працював для мене з Outlook 2013, але це спрацювало:

Private Sub Application_Reminder (елемент ByVal як об’єкт)

Якщо TypeOf Item є AppointmentItem, тоді
MsgBox "Зустріч", vbSystemModal, "Макрос Outlook"
End If

End Sub
Цей коментар був мінімізований модератором на сайті
Благослови тебе за це. Щоб змусити його працювати, мені довелося ввімкнути макроси, але одного разу я зробив "віола!" Ти рятівник! 
There are no comments posted here yet
Залишайте свої коментарі
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця