考虑以下代码:
Public Function HelloWorld() As String
On Error GoTo ErrorHandler
Application.Workbooks("test.xlsm").Worksheets("Sheet1").Activate
Application.Workbooks("test.xlsm").Worksheets("Sheet1").Range("A1").Value = "Hello World"
HelloWorld = "Success"
Exit Function
ErrorHandler:
HelloWorld = Err.Description
End Function
当我使用F5 / F8在开发人员的IDE中运行此程序时,它将根据需要在单元格A1中放置“ Hello World”。但是,当我使用“ = HelloWorld()”在电子表格中运行此代码时,出现错误“应用程序定义的错误或对象定义的错误”。
我想念什么? 预先感谢!