ドナルドは、ユーザーのデスクトップを参照する必要があるマクロを作成しています。ただし、デスクトップへのパスは、システムごと、およびユーザーごとに必然的に異なります。彼は、システムに関係なく、デスクトップへのパスを決定するためにどのコーディングを使用できるのか疑問に思います。

VBAでデスクトップへのパスを見つける方法はいくつかあります。 1つの方法は、次の方法でWindowsスクリプトホストを呼び出すことです。

Function GetDesktop() As String     Dim oWSHShell As Object

Set oWSHShell = CreateObject("WScript.Shell")

GetDesktop = oWSHShell.SpecialFolders("Desktop")

Set oWSHShell = Nothing End Function

これは、ワークシートまたは別のマクロから使用できるユーザー定義のマクロであることに注意してください。ワークシートからの使用は次のようになります：

=GetDesktop()

デスクトップへのパスを決定する別の方法は、コードで次の行を使用することです。

sPath = Environ("USERPROFILE") & "\Desktop"

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（8236）は、Microsoft Excel 2007、2010、2013、2016、2019、およびOffice 365のExcelに適用されます。Excelの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります。

linkデスクトップへのパスを見つける。