デスクトップへのパスを見つける(Microsoft Excel)
ドナルドは、ユーザーのデスクトップを参照する必要があるマクロを作成しています。ただし、デスクトップへのパスは、システムごと、およびユーザーごとに必然的に異なります。彼は、システムに関係なく、デスクトップへのパスを決定するためにどのコーディングを使用できるのか疑問に思います。
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以降)のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。
linkデスクトップへのパスを見つける。