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

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

  関連記事

FileCopy ステートメント00
ファイルをコピー(FileCopy ステートメント)

FileCopy ステートメント ファイルをコピーします。ただし、開いているファ …

「ファイル」ダイアログボックスを表示・設定(FileDialog オブジェクト)

FileDialog オブジェクト FileDialog オブジェクト のメソッ …

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

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

Excel の組み込みダイアログボックス(Dialog, Dialogs)

Excel の組み込みダイアログボックスを表示 Dialog オブジェクト を使 …

特殊フォルダ
特殊フォルダを取得(wsh.SpecialFolders)

CreateObject 関数:特殊フォルダを取得(WSH.SpecialFol …

Open ステートメント・Close ステートメント
テキストファイル(Open ステートメント・Close ステートメント)

新規ブックを開かずにテキストファイルを開く OpenText ステートメント を …

RmDir ステートメント 00
ディレクトリまたはフォルダの削除(RmDir ステートメント)

ディレクトリまたはフォルダの削除 ディレクトリまたはフォルダを削除するには、Rm …

Seek ステートメント 1-1
開いているファイルの読み取り位置または書き込み位置を設定(Seek ステートメント)

Seek ステートメント Open ステートメント で開いているファイルで、次に …

LOF 関数・Loc 関数
開いているファイルのサイズ・位置の取得(LOF 関数・Loc 関数)

LOF 関数 Open ステートメント により開かれたファイルのサイズをバイト単 …

EOF 関数
EOF 関数

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