1

我有一个问题困扰了我最后一天。

我有一个 GetUserName Api,它可以提取当前用户的名称,它工作得很好。

我还有一个未绑定的 OLE 对象,它在表单加载时被此控制。

With Me.OLE1  
.Class = "Excel.Sheet"    
.OLETypeAllowed = acOLELinked    
.SourceDoc = "C:\Users\" & GetUserName & "\Desktop\Database\Excel Files\Bulk Updating.xlsm"    
.SourceItem = "R1C1:R5C5"    
.Action = acOLECreateLink    
.SizeMode = acOLESizeClip    
End With    

当我运行代码时,我在第 4 行得到运行时错误 2101。

当我将第 4 行设置为 Jblogs 而不是我的 get user 函数时,它工作正常。

4

1 回答 1

1

尝试先将结果保存GetUserName到字符串变量中,如

Dim strUser As String
strUser = GetUserName

然后尝试在字符串连接中使用该变量。如有必要,请检查Len(strUser)它是否有任何“有趣”的尾随字符,如空格、空值或类似字符。

于 2013-08-29T21:28:55.207 回答