Question

我根本没有使用VBA，并且想知道是否有人可以帮我在打开工作簿时自动运行宏？打开工作簿时出现错误：

“运行时错误'424'：需要对象”

这是我尝试过的代码：

Private Sub Workbook_Open()
    GetUserName = Application.username
End Sub
Function GetUserName()
    GetUserName = Application.username
End Function

Answer 1

不确定你想要实现的目标，但也许这个？

Private Sub Workbook_Open()
    Sheet1.Range("A1").value=GetUserName
End Sub
Function GetUserName()
    GetUserName = Application.username
End Function

Answer 2

对于上面的解决方案 - 代码可缩短为：

Private Sub Workbook_Open()
    Sheet1.Range("A1").Value = Application.UserName
End Sub

打开工作簿时自动运行宏？

2 个答案: