エクセルの縦のセルのデータ(下のCells( 4 * j + i, 4))を繰り返しで、400個のテキストファイルに書き込みたいのですが、
下の""内のjは繰り返しせずに、j.txtとなって入力されてしまいます。なにかいい方法がありませんでしょうか。
ご協力お願いします。(ちなみにvbaは初心者です。)
Private Sub CommandButton2_Click()
Dim n As Long
n = FreeFile
Dim j As Integer
For j = 0 To 399
For i = 1 To 4
a = Cells( 4 * j + i, 4)
f2 = ActiveWorkbook.Path & "\j.txt"
Open f2 For Append As #n
Print #n, a
Close #n
Next i
Next j
End Sub
例.
1
2
3
4
5
6
7
8
9
10
12
13
1,2,3,4→1.txt
5,6,7,8→2.txt
9,10,11,12→3.txt
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Excel(エクセル) マクロでテキストファイルを読み込んだ際の最終セルにデータと改行が含まれる問題の改善方法 2 2022/03/25 16:50
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:48
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/02/05 09:55
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:12
- Visual Basic(VBA) 複数シートの複数列に入力されているデータを重複なしで抽出するVBAを作りたいです。 9 2022/06/17 10:33
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Excel(エクセル) エクセルで同じ数字同士を自動で線で結ぶVBAを教えてください 6 2022/04/26 23:13
- Visual Basic(VBA) ワークシート内を検索 1 2022/12/19 23:46
- Visual Basic(VBA) ExcelVBAで、index、match関数を使用して、指定範囲に出力したい 3 2022/10/18 21:53
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
バッチ処理 特定の文字以降を...
-
[コンパイルエラー 修飾子が不...
-
verilog HDLについての質問です...
-
Access VBA エラー2448について
-
パイソンでテキストファイルが...
-
【ExcelVBA】300万件越えCSVか...
-
VBA csvファイルのデータを...
-
ダブルコーテーション付きでCSV...
-
VBAで複数のCSVからレコードセ...
-
エクセルVBA Application.GetSa...
-
CSVデータの文字列置換
-
VBAでcsvファイルもシートもあ...
-
vbaマクロについて 次のような...
-
pythonのエラーについて
-
pythonでリストをCSVに出力する...
-
fortranでデータの抜き出しをし...
-
バッチコマンドで指定行を抽出...
-
Excelマクロ 空白セルを無視し...
-
CSVで余計な空行が入る
-
SQLファイルの読み込み
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
バッチ処理 特定の文字以降を...
-
[コンパイルエラー 修飾子が不...
-
VBA テキストボックスを選択状...
-
Access VBA エラー2448について
-
teratermで、ファイル名をinput...
-
パイソンでテキストファイルが...
-
MS-DOSバッチファイルコマンド...
-
SQLでテキストボックスの文字を...
-
verilog HDLについての質問です...
-
フォームのResizeイベントについて
-
型の値をDataGridViewセルに変換...
-
ASP.NET (VB) データのnull(空...
-
分数の計算のプログラミングです。
-
バッチ for /f 空白、スペース...
-
ruby テキストファイル書き出し...
-
バッチファイル フォルダ名をフ...
-
アスキー変換 と 逆変換について
-
■PukiWikiの凍結解除方法を教え...
-
Excelマクロ 空白セルを無視し...
-
【ExcelVBA】300万件越えCSVか...
おすすめ情報