修改日历VBA项目

Question

我想从Excel复制到MS Project有关项目的一些数据。这些数据收集在Excel的表格中，每列都有一个描述下面数据的标题。

我需要确定从中提取数据的正确列，但我尝试的方法给了我一个我无法解决的错误。

使用以下代码，我希望确定哪些列包含项目的任务：

Set taskPos = Worksheets("Sheet1").Range("A1:AA2").Find("Task")
ColTask = taskPos.Column

ColTask​​应该是包含我想要迭代下面元素的任务的列。

For i = 2 To 10
     exTask = Worksheets("Sheet1").Range("ColTask" & i).Value
Next i

通过这种方法，我得到了一个

  

运行时错误1004 vba应用程序定义或对象

我真的不知道如何解决它。

有没有人有想法？

提前致谢