Tag Archives: ファイル入出力

[MSOffice:ExcelVBA]ファイル入出力

サンプルコード ファイル読み込み 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 Sub ReadFile () ‘変数の宣言 Dim aRFullPath As String Dim aRFileNo As Integer Dim aRLine As String   ‘初期化–任意設定 aRFullPath = "c:¥xxxx¥hoge.txt" ‘初期化–固定 aRFileNo = FreeFile   ‘メイン処理_ファイル読み込み Open aRFullPath For Input As a

Read More