ExcelWork.info

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

開いているファイルの現在の読み取り位置または書き込み位置を取得(Seek 関数)

   

Seek 関数

Open ステートメント で開いたファイル内の現在の読み取り位置または書き込み位置を取得します。


【書式】

<取得>
Seek ( filenumber )


引数・戻り値

  • filenumber  ・・・  Open ステートメント で、割り当てられたファイル番号を指定します。
  • 戻り値  ・・・  長整数型(Long)の値( 1 ~ 2,147,483,647(= 2^31 ? 1)の範囲の数)。
    Open ステートメントランダムアクセスモード(Random)で開いている場合は、読み取りまたは書き込みが行われるレコードの番号(最後に読み書きを行ったレコードの次の番号)となります。
    Open ステートメントシーケンシャル入力モード(Input)シーケンシャル出力モード(Output)追加モード(Append)バイナリモード(Binary) のいずれかで開いている場合は、読み取りまたは書き込みが行われるバイト位置(最後に読み書きを行ったバイト番号の次の番号)となります。

Loc 関数の場合
ランダムアクセスモード(Random)でファイルを開いた場合は、最後に読み書きを行ったレコード番号を返します。また、バイナリモード(Binary)でファイルを開いた場合は、最後に読み書きを行ったバイト番号を返します。シーケンシャルモード(Input、Output、Append)の場合は、現在のバイト位置を 128 で割った値を返します。



Seek 関数 使用例

サンプルVBAソース


実行結果

サンプルVBAソース で、読み込むファイル「test03.txt」の内容

Seek 関数 00

サンプルVBAソースを実行した結果

Seek 関数 01



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

Message

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

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

  関連記事

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

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

FileDateTime 関数
ファイルのタイムスタンプを取得(FileDateTime 関数)

ファイルのタイムスタンプを取得 ファイルのタイムスタンプを取得するには、File …

テキストファイル:データを書き込む(Print # ステートメント)

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

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

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

ファイルを削除(Kill ステートメント)

ファイルを削除する ファイルを削除するには、Kill ステートメント を使用しま …

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

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

テキストファイル:データを読み込む(Input # ステートメント)

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

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

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

Write # ステートメント 00
テキストファイル:データを書き込む(Write # ステートメント)

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

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

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