Documentation Excel VBA

概要

ChDir関数は、VBA（Visual Basic for Applications）で現在の作業ディレクトリを変更するための関数です。作業ディレクトリを変更することで、ファイルの保存場所や読み込みの対象ディレクトリを動的に切り替えることができます。この関数はファイル操作を行う際に非常に有用です。

構文

ChDir パス

パラメータ

  • パス

    変更したいディレクトリのパスを文字列で指定します。フルパスまたは相対パスのいずれも使用可能です。

使用例

基本的な使用例

現在の作業ディレクトリを変更する簡単な例を示します。

Sub ChangeDirectoryExample()
    ' "C:\Users\Username\Documents" にディレクトリを変更
    ChDir "C:\Users\Username\Documents"
    MsgBox "現在のディレクトリが変更されました。"
End Sub

相対パスの使用

相対パスを使用してディレクトリを変更することも可能です。

Sub ChangeToRelativeDirectory()
    ' 親ディレクトリに移動
    ChDir ".."
    MsgBox "親ディレクトリに移動しました。"
End Sub

ドライブの変更を伴うディレクトリの変更

ChDir関数はディレクトリの変更のみを行うため、異なるドライブへの変更をする場合は先にChDrive関数を使います。

Sub ChangeDriveAndDirectory()
    ' ドライブをDに変更
    ChDrive "D"
    ' DドライブのTestフォルダに変更
    ChDir "D:\Test"
    MsgBox "DドライブのTestディレクトリに変更されました。"
End Sub

注意点

  • 存在しないディレクトリを指定するとエラーが発生する

    ChDir関数は指定したディレクトリが存在しない場合、Path not foundエラーを発生させます。事前にディレクトリが存在するか確認する必要があります。

  • ネットワークドライブの指定に注意が必要

    ネットワークドライブのパスを指定する際、マップされたドライブ名で指定するか、UNC（Universal Naming Convention）パスを使用する必要があります。

  • アクセス権限に注意

    管理者権限が必要なディレクトリへアクセスしようとするとエラーが発生する場合があります。ディレクトリのアクセス権限を確認してから使用してください。

実用例

ファイル操作前にディレクトリを変更する

ファイルを読み込む前に作業ディレクトリを変更することで、ファイルパスを簡略化できます。

Sub OpenFileInSpecificDirectory()
    ' 作業ディレクトリを変更
    ChDir "C:\Users\Username\Documents\Reports"

    ' レポートファイルを開く
    Workbooks.Open Filename:="Report.xlsx"
    MsgBox "レポートファイルが開かれました。"
End Sub

エラーハンドリングを含む例

エラーを避けるためのエラーハンドリングを組み合わせた使用例です。

Sub SafeChangeDirectory()
    On Error GoTo ErrorHandler

    ' 存在するディレクトリに変更
    ChDir "C:\Users\Username\Downloads"
    MsgBox "ディレクトリが変更されました。"
    Exit Sub

ErrorHandler:
    MsgBox "ディレクトリの変更中にエラーが発生しました。"
End Sub

まとめ

ChDir関数は、VBAで作業ディレクトリを動的に変更する際に便利なツールです。ただし、指定するディレクトリが存在するかや、アクセス権限の問題などに注意が必要です。ファイル操作と組み合わせることで、スクリプトの柔軟性を高めることができます。

参照:

ChDir 関数（Visual Basic for Applications） | Microsoft Learn
円