ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

Open ステートメントで使用できるファイル番号を取得(FreeFile 関数)

   

FreeFile 関数

Open ステートメントで使用するファイル番号( 1 ~ 511 の値)は、重複して使用しようとするとエラーが発生してしまいます。FreeFile 関数 を使用すると現在使われていないファイル番号を取得することができます。


【書式】

<取得>
result = FreeFile [( rangenumber )]


引数・戻り値

  • rangenumber  ・・・  0(既定値)を指定すると 1 ~ 255 の範囲のファイル番号が返されます。1 を指定すると 256 ~ 511 の範囲のファイル番号が返されます。
  • result  ・・・  ファイル番号を表す整数型(Integer)の値。


FreeFile 関数 使用例

サンプルVBAソース


実行結果

サンプルVBAソース 実行前

FreeFile 関数 00

実行後

FreeFile 関数 01

FreeFile 関数 02



aaa

 - Excel・ファイルの操作 , , , ,

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

ファイル名・パス取得
フルパスからファイル名、パスを取得する

フルパスからファイル名のみを取得する フルパスからファイル名を取得するには、Di …

Width # ステートメント
テキストファイル:出力する 1 行の幅を設定(Width # ステートメント)

Width # ステートメント Open ステートメント をシーケンシャル出力モ …

ディレクトリまたはフォルダの作成(MkDir ステートメント)

ディレクトリまたはフォルダの作成 新しいディレクトリまたはフォルダを作成するには …

no image
組み込みダイアログボックスの引数一覧

組み込みダイアログボックスの引数一覧 Excel の組み込みダイアログボックスを …

Get ステートメント Binary モード 01
テキストファイル:データを読み込む(Get ステートメント)

Get ステートメント Open ステートメント をランダムアクセスモード(Ra …

テキストファイル:データを読み込む(Input 関数・InputB 関数)

Input 関数・InputB 関数 Open ステートメントをシーケンシャル入 …

「ファイルを開く」ダイアログボックスを表示(GetOpenFilename メソッド)

GetOpenFilename メソッド ファイル名を取得するための、「ファイル …

「名前を付けて保存」ダイアログボックスを表示(GetSaveAsFilename メソッド)

GetSaveAsFilename メソッド 「名前を付けて保存」ダイアログボッ …

EOF 関数
EOF 関数

EOF 関数 Open ステートメント をランダムアクセスモード(Random) …

FileDialog オブジェクトを取得する(FileDialog プロパティ)

FileDialog プロパティ FileDialog オブジェクト を取得しま …