解决MS Project导出Excel时VBA设置单元格超链接的424错误

错误原因及修复 #

424错误是因为Cells(currentLine,9)未明确指定所属工作表，Excel无法识别锚点对象。必须将单元格对象关联到mySheet，消除全局范围的歧义。

完整修正代码 #

以下是包含内容判断逻辑的代码，仅当字段有有效内容时才添加超链接：

' 假设循环中处理任务时，.Text2为SharePoint链接字段
If Trim(.Text2) <> "" Then
    mySheet.Hyperlinks.Add _
        Anchor:=mySheet.Cells(currentLine, 9), _
        Address:=.Text2, _
        TextToDisplay:="Checklist"
End If

关键注意点 #

• 必须给Cells指定所属工作表mySheet，这是解决424错误的核心
• 使用Trim(.Text2) <> ""过滤空值或仅含空格的无效内容，避免生成无意义超链接
• 注意拼写：原代码中的HyperLink需改为复数形式Hyperlinks，这是常见语法错误点

内容的提问来源于stack exchange，提问作者Brendan