Office TANAKA - Excel VBA Tips[特殊フォルダを取得する]

ブックに名前を付けて保存するときはSaveAsメソッドです。たとえば次のコードは、アクティブブックに「Sample1.xls」という名前を付けて保存します。 Sub Sample1() ActiveWorkbook.SaveAs "Sample1.xls" End Sub このとき、ファイル名が「Sample.xls」のように保存するフォルダのパスを指定していないので、この「Sample.xls」はカレントフォルダに保存されます。 保存するフォルダを特定して保存したいときは、次のようにフォルダのパスを指定します。次のコードは、アクティブブックを「C:\Data」フォルダに「Sample.xls」という名前で保存します。 Sub Sample2() ActiveWorkbook.SaveAs "C:\Data\Sample1.xls" End Sub ここまでは簡単です。 ではデスクトップや

[Tomoaki00]

デスクトップやドキュメントのような特殊フォルダを取得する方法は以外と重要です。