☰

如何在指定日期范围内将 Outlook 任务导出到 Excel（VBA）

tag-icon • tag-icon microsoft-excel microsoft-outlook vba
如何在指定日期范围内将 Outlook 任务导出到 Excel（VBA）

问题 我对 VBA 还不太熟悉，目前正在编写一段代码，将所有 Microsoft Outlook 任务提取到新的 Excel 表中。到目前为止，VBA 代码运行良好，但我无法让它仅提取用户指定日期内的数据。

眼镜 Microsoft Outlook/Excel 2010，Windows 7

以下是非工作代码的摘录：

'VBA MACRO WHICH RUNS IN OUTLOOK 
 --------------
Dim strStart As Date
Dim strEnd As Date

strStart = InputBox("Enter a start date using the following format MM/DD/YYYY", "Input  Required")
strEnd = InputBox("Enter a due date using the following format MM/DD/YYYY", "Input  Required")

strQuery = "[DueDate] >= 'strStart' AND [DueDate] <= 'strEnd'"
Set OlkList = Ns.GetDefaultFolder(olFolderTasks).Items.Restrict(strQuery)

答案1

您可以按照您的标准直接插入变体，而不是插入它们的值，以修复使用此方法：

"[DueDate] >= '" & strStart & "' AND [DueDate] <= '" & strEnd & "'"

相关内容