使用 VBA 在 Microsoft Project 中获取视图选项答案

【问题标题】：Getting view options in Microsoft Project using VBA使用 VBA 在 Microsoft Project 中获取视图选项
【发布时间】：2013-04-29 12:31:25
【问题描述】：

如果我想将当前的日期格式改为20，例如可以使用命令

OptionsViewEx DateFormat:=20

但我如何获取当前日期格式（或任何其他视图选项）？

【问题讨论】：

【解决方案1】：

DefaultDateFormat 应该是要使用的函数。

oldvalue = Application.DefaultDateFormat
Application.DefaultDateFormat = 20 ' or = pjDate_mm_dd_yyyy

这获取或设置默认日期格式。 (technet)

This 给出了格式类型的完整列表。

【讨论】：

【解决方案2】：

如果您使用Date 函数获取当前格式的日期，但如果您需要更改，请使用format(Date,"yyyy-mmmm-dd")。

【讨论】：

我没有尝试格式化特定日期。我正在尝试更改 Project 用于在其 GUI 中显示日期的格式，这是通过转到 Tools->Options->View->Date 格式手动完成的。这是通过使用 OptionsView 方法以编程方式完成的，就像我在我的问题中演示的那样。我不知道该怎么做，是如何以编程方式获取当前的视图->日期格式设置。