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 を get user 関数の代わりに Jblogs に設定すると、正常に動作します。

4

1 に答える 1

1

GetUserName次のように、最初に文字列変数に結果を保存してみてください。

Dim strUser As String
strUser = GetUserName

次に、文字列連結でその変数を使用してみてください。必要に応じLen(strUser)て、空白、ヌルなどの「おかしな」文字が末尾にあるかどうかを確認してください。

于 2013-08-29T21:28:55.207 に答える