vba - 将 UserName API 的结果插入文件路径

Question

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

我有一个 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 函数时，它工作正常。

Answer 1

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

Dim strUser As String
strUser = GetUserName

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