エクセル 現在のカレントドライブ・カレントフォルダーを変更せよ(Excel VBA)

【本日のミッション】

現在のカレントドライブと、カレントフォルダーを変更せよ。

ミッションの概要

現在のカレントドライブと、カレントフォルダーを変更するのが今回のミッションです。

例えば、GetOpenFilenameメソッドを使ってファイルを選択する際に、開いて欲しいフォルダをあらかじめ指定することができます。

GetOpenFilenameメソッドについてはこちらをご参照ください。
「ファイルを開く」ダイアログボックス から ファイル名を取得(Excel VBA)
「ファイルを開く」ダイアログボックス から 複数 ファイル名を取得(Excel VBA)

【いつもの「ファイルを開く」で開くフォルダ】
私の現在のカレントフォルダは「ドキュメント」なので、「ドキュメント」フォルダが開きます。
エクセル 現在のカレントドライブ・カレントフォルダーを変更せよ(Excel VBA)


↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓

【あらかじめ任意のフォルダを指定しておくことができる】
エクセル 現在のカレントドライブ・カレントフォルダーを変更せよ(Excel VBA)

■■■スポンサーリンク■■■

イベントプロシージャ

Sub カレントドライブフォルダー変更()

    ChDrive "D"          ’カレントドライブの変更
    ChDir "D:¥Folder"    ’カレントフォルダの変更
    
    Application.GetOpenFilename

End Sub

ChDrive で変更した「D」ドライブの、ChDir で変更した「D:¥Folder」フォルダーが、GetOpenFilenameメソッドで表示されます。

エクセル 現在のカレントドライブ・カレントフォルダーを変更せよ(Excel VBA)

GetOpenFilenameメソッドの使い方についてはこちらをご参照ください。
「ファイルを開く」ダイアログボックス から ファイル名を取得(Excel VBA)
「ファイルを開く」ダイアログボックス から 複数 ファイル名を取得(Excel VBA)

ChDrive カレントドライブの変更

ChDrive ドライブパス文字列

カレントドライブの場所を「ドライブパス文字列」に変更します。

ChDir カレントフォルダの変更

ChDir フォルダーパス文字列

カレントフォルダーの場所を「フォルダーパス文字列」に変更します。

【参考】

指定したフォルダ内のファイル名全てを取得(Excel VBA)
変数でよく使われる「buf」「tmp」の意味
Dir関数が取得するファイルの順番
指定したフォルダ内のフォルダ名全てをGetAttrを使って「エラー53 ファイルが見つかりません。」を出さずに取得(Excel VBA)
GetAttrとは?「= vbDirectory」ではなく「And vbDirectory」となるビット演算の疑問
フォルダ名だけを取得したい時に出てくる 「.」 と 「..」 とは?
指定したフォルダ内とサブフォルダ内全てのファイル名を取得(Excel VBA)
CreateObject(“Scripting.FileSystemObject”) を使ってサブフォルダを取得
再帰処理とは?フォルダ内とサブフォルダ内全てのファイル名を取得(Excel VBA)
指定したフォルダ内のサブフォルダのフォルダ名を全部取得(Excel VBA)
再帰処理とは?フォルダ内のサブフォルダのフォルダ名を全部取得(Excel VBA)
参照渡し「ByRef」と値渡し「ByVal」の違い(Excel VBA)
ファイルのフルパスからファイル名のみを取得 InStrRev関数(Excel VBA)
指定したフォルダの全ての階層のフォルダ名・サブフォルダ名・ファイル名を取得(Excel VBA)
FileSystemObjectとは?CreateObject 関数 FolderExists・GetFolderの使い方
FileSystemObject CreateObject関数を使う方法・ 参照設定を使う方法 違いを理解してエラー防止
再帰処理とは?指定したフォルダの全ての階層のフォルダ名・サブフォルダ名・ファイル名を取得(Excel VBA)
ファイルのフルパスからファイル名のみを取得 Split関数(Excel VBA)
Callステートメントとは 引数 括弧()の使い方(Excel VBA)
指定したフォルダ内から「特定の文字を含まないファイル名」を取得(Excel VBA)
ワイルドカードとは。使い方いろいろ。(Excel)
Dir関数の使い方。ファイル名やフォルダ名の取得方法。(Excel VBA)
指定したフォルダのファイル名を取得し、そのファイル名を一括で変換(Excel VBA)
Excel起動時に「コンパイルエラー」。64ビット システムで Declareステートメントに、PtrSafe属性を設定(Excel VBA )
「ファイルを開く」ダイアログボックス から ファイル名を取得(Excel VBA)
「ファイルを開く」ダイアログボックス から 複数 ファイル名を取得(Excel VBA)
指定フォルダ内のサブフォルダ全てをフォルダ構成のみ(空フォルダ)を別フォルダにコピー(Excel VBA)
再帰処理とは?指定フォルダ内のサブフォルダ全てをフォルダ構成のみ(空フォルダ)を別フォルダにコピー(Excel VBA)
エクセル Dir関数 を使ってファイルの存在(有無)を確認する(Excel VBA)
エクセル FileSystemObject を使ってファイルの存在(有無)をチェックする(Excel VBA)
Excel Dir関数 存在しないファイル・フォルダが「存在している」と判定される理由(Excel VBA)
Windows ファイル・フォルダのフルパスを簡単にコピー 取得する方法
エクセル 現在のカレントドライブ・カレントフォルダーを変更せよ(Excel VBA)

■■■スポンサーリンク■■■