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

如何在 Outlook 中将全天事件默认设置为忙碌?

默认情况下,Outlook 将约会和会议的状态设置为 “忙碌的”, 但全天活动 “自由” (见下面的截图)。 每次创建全天事件时,您都需要手动将 Show As 状态更改为 Busy。 要将全天事件的默认显示状态更改为忙碌,本文为您提供了两种方法。


通过创建自定义表单将全天活动默认设置为忙碌

自定义表单可以帮助您使用默认设置创建全天事件 显示为 状态 忙。 请按以下步骤操作。

1. 切换到日历视图。 点击 公司首页 > 新任命.

2. 在新的约会窗口中,单击开发人员 > 设计此表单。

提示: 如果 开发商 选项卡未显示在功能区上,请按照方法 在这篇文章中 显示它。

3. 然后约会窗口转到设计模式。 您需要点击 (P.2) 标签。

4。 拖动 全天的活动 场和 显示时间为 来自的字段 字段选择器 窗格分别到板下 (P.2) 标签

5.右击拖出的 全天的活动 字段并选择 租房 从上下文菜单。

6。 在里面 租房 对话框,您需要配置如下。

6.1)转到 标签;
6.2)在 初始值 部分,检查 将此字段的初始值设置为 框;
6.3) 输入一个值 “真正” 进入文本框;
6.4)点击 OK 按钮。 看截图:

7.右键单击组合框 显示时间为 字段并单击 租房 从上下文菜单。

8。 在里面 租房 对话框,您需要配置如下。

8.1)转到 标签;
8.2)在 初始值 部分,检查 将此字段的初始值设置为 框;
8.3) 输入一个数字“2” 进入文本框;
8.4)点击 OK 按钮。 看截图:

9。 点击 发布 > 发布表单为 在功能区上。

10。 在里面 发布表单为 对话框,您需要:

10.1) 在 在看 下拉列表。 这里我选择 个人形式图书馆 物品;
10.2) 在 显示名称 文本框;
10.3)点击 发布 按钮。 看截图:

11. 关闭约会窗口而不保存。

12. 从现在开始,当您需要创建全天活动且显示状态默认为忙碌时,请切换到 日历 查看并点击 公司首页 > 新东西 > 自定义表单 > “自定义表单的名称”。

请注意: 要创建一个“显示为状态”默认为“免费”的全天活动,只需照常操作:单击 公司首页 > 新任命,然后检查 全天的活动任命 窗口。


使用 VBA 将全天事件默认值更改为忙碌

上述方法步骤太多。 如果您总是需要创建一个“显示为”状态默认为“忙碌”的全天事件,以下 VBA 代码可以帮助您轻松完成它。

1.启动Outlook,按 其他 + F11 同时打开 Microsoft Visual Basic应用程序 窗口。

2。 在里面 Microsoft Visual Basic应用程序 窗口,双击 Project1 > Microsoft Outlook对象 > 本次展望会议 打开 本次展望会议 (码) 窗口,然后将以下代码复制到此代码窗口中。

VBA 代码:将全天事件状态默认设置为“忙碌”

Public WithEvents GInspectors As Inspectors
Public WithEvents GAppointmentItem As AppointmentItem

Private Sub Application_Startup()
'Updated by Extendoffice 20220413
  Set GInspectors = Application.Inspectors
End Sub

Private Sub GInspectors_NewInspector(ByVal Inspector As Inspector)
  Select Case Inspector.CurrentItem.Class
    Case olAppointment
      Set GAppointmentItem = Inspector.CurrentItem
  End Select
End Sub

Private Sub GAppointmentItem_Open(Cancel As Boolean)
  Select Case GAppointmentItem.AllDayEvent
    Case True
      GAppointmentItem.BusyStatus = olBusy
  End Select
End Sub

Private Sub GAppointmentItem_PropertyChange(ByVal Name As String)
  If Name = "AllDayEvent" Then
    Select Case GAppointmentItem.AllDayEvent
      Case True
        GAppointmentItem.BusyStatus = olBusy
    End Select
  End If
End Sub

3. 保存 VBA 代码并重新启动 Outlook。

从现在开始,在将约会或会议转换为全天活动后, 显示为 状态将显示为 “忙碌的” 默认情况下。


相关文章

在 Outlook 中更改全天事件的默认提醒时间
通常,全天事件的默认提醒时间在Outlook 18/2007中为2010小时,在Outlook 0.5中为2013天。有时,全天事件的默认提醒时间可能与您的工作计划不一致。 在这里,我们将介绍在Microsoft Outlook中更改全天活动的默认提醒时间的方法。

更改 Outlook 中的默认跟进时间
众所周知,当我们在Outlook中为电子邮件添加跟进提醒时,默认的跟进时间为4:30 PM(或其他时间取决于您的工作时间)。 但是,您可能需要更改默认的跟进时间,并让它在工作时间开始时提醒您,例如9:00 AM。 在本文中,我将向您展示如何在Outlook中更改默认的跟进时间。

更改 Outlook 中的默认存档位置
默认情况下,Outlook具有存档文件的默认位置。 除了默认位置,您还可以为存档文件设置自己的存档位置。 在本教程中,我们将详细向您展示如何在Outlook中更改默认存档位置。

在Outlook中更改默认附件保存位置
您是否对每次启动Outlook时都指定的附件位置感到厌烦? 在本教程中,我们将向您展示如何更改默认附件位置。 此后,即使重新启动Outlook,每次保存附件时,也会自动打开指定的附件保存文件夹。

在 Outlook 中更改延迟传递的默认时间
本教程提供了一个 VBA 代码来帮助您更改 Outlook 中延迟交付选项的默认时间。


Kutools for Outlook-为Outlook带来100个高级功能,并使工作更加轻松!

  • 自动CC / BCC 根据规则发送电子邮件; 自动转发 自定义多封电子邮件; 自动回复 没有交换服务器,还有更多自动功能...
  • BCC警告 -当您尝试全部答复时显示消息 如果您的邮件地址在“密件抄送”列表中; 缺少附件时提醒,还有更多提醒功能...
  • 在邮件对话中回复(全部)带有所有附件; 回复许多电子邮件 很快; 自动添加问候语 回复时将日期添加到主题中...
  • 附件工具:管理所有邮件中的所有附件, 自动分离, 全部压缩,全部重命名,全部保存...快速报告, 计算选定的邮件...
  • 强大的垃圾邮件 习俗 删除重复的邮件和联系人... 使您能够在Outlook中做得更聪明,更快和更好。
拍摄kutools前景kutools选项卡1180x121
拍摄kutools前景kutools加标签1180x121
 
按评论排序
注释 (3)
还没有评分。 成为第一位评论!
该评论由网站上的主持人最小化
嗨,
我尝试了第二种技术,但没有奏效。 你知道这是否仍然适用于最新的 Outlook 版本?
最好的,
该评论由网站上的主持人最小化
嗨,本杰明·吉安,
是的,代码仍然适用于最新的 Outlook 版本? 你有没有得到任何错误提示?
该评论由网站上的主持人最小化
你好,
ani mě 到 nefunguje。 Nevyskočila ani žádná zpráva。
Office Microsoft 365 应用程序专业组织。

Můžu to nějak trasovat nebo najít někde v logu?

迪克洪扎
这里还没有评论
留下你的意见
以访客身份发帖
×
评价此帖子:
0   产品特性
建议地点

关注我们

版权所有 © 2009 - extendoffice.com。 | 版权所有。 供电 ExtendOffice。 | 网站地图
Microsoft和Office徽标是Microsoft Corporation在美国和/或其他国家的商标或注册商标。
受Sectigo SSL保护