【VBA】デスクトップのパスを取得する方法(特殊フォルダ)
今回はVBAでデスクトップフォルダのパスを取得する方法を紹介します。
ドキュメントフォルダのパスは「C:\Users\ユーザ名\Desktop」となっており、ログインユーザによって変わります。
そのため、このパスをそのままマクロに書くと1人のユーザーしか使えなくなってしまいます。
マクロでデスクトップフォルダを指定するときは、通常のパスではなく今回紹介する方法を使いましょう。
VBAが難しいと感じたら
デスクトップフォルダのパスを取得する方法
Sub GetDesktopFolderPath()
'Windows Script Hostのオブジェクトを取得
Dim wsh As Object
Set wsh = CreateObject("WScript.Shell")
Debug.Print wsh.SpecialFolders("Desktop")
End Subこのプログラムを実行すると、「C:\Users\ユーザ名\Desktop」のパスがイミディエイトウィンドウに表示されます。
この方法であれば、ユーザ名が自動的にログインしている人の名前となるため、誰でもマクロを使うことができます。
VBAが難しいと感じたら
《VBA中級者向けの本》
VBA上級者を目指したい人にはパーフェクトExcel VBA一択です。
