カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）
カレントフォルダ
カレントフォルダとは、ブックを開いたり保存するときに既定で参照する場所のことです。カレントフォルダを取得するには、CurDir 関数 を使用します。カレントフォルダを変更するには、ChDir ステートメントを、カレントドライブを変更するには、ChDrive ステートメント を使用します。
CurDir 関数
引数で指定したドライブのカレントフォルダのパスを表す文字列型（String）の値を取得します。
string = CurDir( [ drive ] )
引数・戻り値
- drive ・・・ ドライブ名を文字列で指定します。省略すると現在のカレントドライブを指定します。「C:」のように指定します。
ChDir ステートメント
引数で指定したパスにカレントフォルダを変更します。ただし異なるドライブのパスを指定することはできません。
ChDir( path )
引数・戻り値
- path ・・・ カレントフォルダに設定したいパスを文字列で指定します。
ChDrive ステートメント
ChDir ステートメントでは、ドライブを変更することができません。異なるドライブの任意のフォルダをカレントフォルダに設定したい場合、先に、ChDrive ステートメントを実行しカレントドライブを変更しておきます。
ChDrive( drive )
引数・戻り値
- drive ・・・ ドライブ名を指定します。
（例）ChDrive = “D” （カレントドライブを D ドライブに変更）
CurDir 関数 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 |
Sub Sample_ExportAsFixedFormat() 'カレントフォルダ を「C:\Users」に変更 ChDir("C:\Users") '現在のカレントフォルダのパスを表示 MsgBox CurDir("C:") End Sub |
実行結果
関連記事
-
-
ユーザー定義関数：セルを取得する（ThisCell プロパティ）
入力されたセルを取得する ワークシート上で使用する Function プロシージ …
-
-
取り消し線を設定する（Strikethrough プロパティ)
取り消し線を設定する（Strikethrough プロパティ) Striketh …
-
-
配列の要素数を取得する（UBound 関数・LBound 関数）
UBound 関数・LBound 関数 【書式】 result = UBound …
-
-
変数が数値型かどうかをチェックする（ IsNumeric 関数 ）
IsNumeric 関数の使い方 【書式】 result = IsNumeric …
-
-
フォントサイズ（Size プロパティ・StandardFontSize プロパティ）
フォントサイズを取得・設定する（Size プロパティ） Size プロパティは、 …
-
-
フォント名（Name,ThemeFont,StandardFont）
フォント名を取得・設定する（Name プロパティ） Name プロパティは、オブ …
-
-
日付時刻：時・分・秒を取得（Hour、Minute、Second 関数）
日付時刻から時・分・秒を取得する関数 【書式】 time_hour = Hour …
-
-
配列（多次元配列・配列の次元の変更）
多次元配列 【書式】 多次元配列の宣言 ＜静的配列（固定長配列）＞ Dim my …
-
-
引数の整数部分を取得する（Fix 関数・Int 関数）
Fix 関数・Int 関数の使い方 【書式】 number_fix = Fix …
-
-
文字列：文字列を最後から検索してその最初の文字位置を返す（InStrRev 関数）
InStrRev 関数 任意の文字列の中で、指定した文字列を最後から検索して、見 …