Excel 设置MS Project任务字段时参数值无效错误
在Excel VBA中,我突然出现以下错误: 运行计时器错误1101:参数值无效 我正在尝试将Microsoft Project中任务的所有工作完成百分比字段设置为0。 此代码块中出现错误: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)
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-从文档中可以看到字符串。解决了我自己的问题。见下文