如何在vba-excel中使vba-word工作？

Question

以下两行

Dim curTasks As Tasks
Set curTasks = Application.Tasks

获取所有当前任务的列表，并在vba-word中使用魅力，但不在vba-excel中。 有没有办法将其移植到vba-excel？

Answer 1

正如我在评论中所说，VBA中的Excel对象没有任务的概念。您可以在Excel模块中执行以下操作（尽管我仍然不确定您为什么要这样做）：

Dim curTasks As Tasks

Dim wrd As Word.Application

Set wrd = CreateObject("Word.Application")

Set curTasks = wrd.Tasks

注意：您必须添加对Microsoft Word对象库的引用才能使其正常工作