教えて!ExcelVBA!

ExcelVBAの基礎知識・書き方について紹介します。

【ExcelVBA 関数】ChDirステートメントの使い方を教えて!

構文

構文は以下の通りです。

ChDir ”パス”

解説

ChDirは、指定したパスに作業ディレクトリを変更します。作業ディレクトリとは、VBAの実行時にファイルの読み書きが行われるディレクトリのことです。

引数 指定 内容
パス 必須 パスは文字列で指定し、絶対パスまたは相対パスを使用することができます。引用符(")で囲む必要があります。

使用例

ChDir "C:\Users\Username\Documents"

使い方

ChDirを使用するには、以下の手順を踏みます。

1.ChDir関数を使用する前に、まずは変更したいディレクトリのパスを正確に把握しておきます。

今回は、以下のパスに変更します。

"C:\Users\Username\Documents"

2.ChDir関数を使用して、作業ディレクトリを変更します。

以下は、ChDir関数の基本的な使い方の例です。

ChDir "C:\Users\Username\Documents"

この例では、"C:\Users\Username\Documents"というディレクトリに作業ディレクトリを変更します。適宜、自分の環境に合わせてパスを変更してください。

プログラミング例

以下に、プログラミング例を紹介します。

Sub EnumerateFiles()
    Dim Path As String
    Dim FileName As String
    Path = "C:\Users\Username\Documents"
    ChDir Path
    FileName = Dir(Path & "\*.*")
    Do While FileName <> ""
        Debug.Print FileName
        FileName = Dir
    Loop
End Sub

この例では、"C:\Users\Username\Documents"というディレクトリ内のすべてのファイルを列挙しています。ChDir関数を使用して、作業ディレクトリを指定のパスに変更し、Dir関数を使用してファイルの一覧を取得しています。

まとめ

ChDir関数は、作業ディレクトリを変更するための重要な機能であり、ファイルの読み書きなどの処理を行う際に役立ちます。是非活用してください。