Question

大家好我有循环，它为我打开内联形状（在doc中附加的xlsx文件）。它工作正常但有时我得到一个错误：

  Run-time error 6069

它通知我尝试打开excel应用程序，可能它没有安装（WOW）。当我调试它突出显示一个车道

wddoc.InlineShapes(lShapeCnt).OLEFormat.Activate

我按“运行”，它正常工作，就像没有错误一样。但这令人沮丧，因为我需要干预，使用此工具的用户无法做到这一点。

Answer 1

可能是一些超时问题。您可能会尝试重复操作一段时间：

...
timeout = Now + #00:00:01# 'Try for 1 second max
On Error Resume Next
Do
    Err.Clear
    wddoc.InlineShapes(lShapeCnt).OLEFormat.Activate
    Doevents 'Sometimes you need to allow events to succeed in some methods
Loop While Err.Number=0 Or Now>timeout
If Err.Number <> 0 Then
    MsgBox "Coudn't make call..."
    Err.Raise Err.Number
End If
On Error GoTo 0 'or whatever error handler you were using
...

运行时错误6069

1 个答案: