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

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_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

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

このヒント(8233)は、Microsoft Excel 97、2000、2002、および2003に適用されます。Excel(Excel 2007以降)のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。