将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)以查看它是否有任何“有趣”的尾随字符，如空格，空值或类似字符。