Excel 设置MS Project任务字段时参数值无效错误

Excel 设置MS Project任务字段时参数值无效错误,excel,vba,ms-project,Excel,Vba,Ms Project,在Excel VBA中,我突然出现以下错误: 运行计时器错误1101:参数值无效 我正在尝试将Microsoft Project中任务的所有工作完成百分比字段设置为0。 此代码块中出现错误: Dim t As Task Dim row As Variant For Each row In tasksDict.Keys If tasksDict(row).Active Then Set t = tasksDict(row)

在Excel VBA中,我突然出现以下错误:

运行计时器错误1101:参数值无效

我正在尝试将Microsoft Project中任务的所有工作完成百分比字段设置为0。 此代码块中出现错误:

    Dim t As Task
    Dim row As Variant
    For Each row In tasksDict.Keys
        If tasksDict(row).Active Then
            Set t = tasksDict(row)
            t.SetField FieldID:=188743713, Value:=0 ' ERROR HERE (sets the Percent Work Complete field)
        End If
    Next row
如果我这样做也不行:

t.SetField FieldID:=188743713, Value:="0"
有人能帮我弄清楚什么是有效值吗


编辑:注意这段代码直到今天还在运行。这可能是微软方面的错误吗?

已解决。阅读文档后,我意识到您无法设置摘要任务的“完成工时百分比”字段,因此我在代码中添加了一个额外的if语句:

Dim t As Task
Dim row As Variant
For Each row In tasksDict.Keys
    If tasksDict(row).Active Then
        Set t = tasksDict(row)
        If Not t.Summary Then
            t.SetField FieldID:=188743713, Value:=0 ' ERROR HERE (sets the Percent Work Complete field)
        End If
    End If
Next row

通过将0用双引号括起来,可以将其从整数改为字符串。@Mech-从文档中可以看到字符串。解决了我自己的问题。见下文