A 回答 (14件中11~14件)
- 最新から表示
- 回答順に表示
No.4
- 回答日時:
#2です。
デスクトップにファイルを書き出しますので、
文字数が多いファイルを分割したらデスクトップ
がうざったくなります。
フォルダを生成し、フォルダの中にテキストファ
イルを書き出すようにしてもいいかもしれません。
No.3
- 回答日時:
ソフトを探さなくても、場合によっては、簡単なプログラムでできるので、エクセルVBAで誰か回答をで作ってくれますよ。
エクセルがあるという条件で。ただし「分割して複数のファイル」の意味が不明。どういう風にするのか。
「長文のテキストファイルがあるんですけど」のレコードの長さが、可変長なのかどうか、で難しさが影響する。レコードといっても判らないかな。
手元に実データがない以上、テストが難しいので答えも上げにくい。
例えばメモ帳かワードパッドでそのファイルは読め(表示でき)ますか。
どんな風になりますか。
復帰改行までが1レコードなんですが。
機械的に1000文字できるのかどうか。
目的や用途は。
No.2
- 回答日時:
エクセルVBAです。
1000文字以内で分割します。1行単位で文字数カウントしますので、1ファイル
の文字数には少しばらつきがでます。
Sub txtbunkatu()
Dim txtmei As String
Dim Newtxtmei As String
Dim i As Long
Dim j As Long
Dim MyLen As Long
Dim naiyou As String
txtmei = Application.GetOpenFilename(Title:="テキストファイル")
If txtmei = "False" Then Exit Sub
Open txtmei For Input As #1
Do Until EOF(1)
Input #1, dat
i = i + 1
If MyLen + Len(dat) > 1001 Then
j = j + 1
Newtxtmei = CreateObject("WScript.Shell").SpecialFolders("Desktop") & "\" & "Newtxt" & j & ".txt"
If Dir(Newtxtmei) <> "" Then
MsgBox "既に同名のファイルが存在します。"
Exit Sub
Else
Open Newtxtmei For Output As #2
Print #2, naiyou;
Close #2
naiyou = ""
MyLen = 0
End If
Else
MyLen = MyLen + Len(dat)
naiyou = naiyou & vbCrLf & dat
End If
Loop
Close #1
End Sub
No.1
- 回答日時:
ファイル分割ツールはvectorに
http://www.vector.co.jp/vpack/filearea/win/util/ …
にあります
ご要望だとファイルサイズ2kで分割すればいいのではないかと
使いやすいのを見つけてはどうでしょうか
またdivだと(http://www.vector.co.jp/soft/win95/util/se088352 …)テキストの行数で分割できます
参考URL:http://www.vector.co.jp/soft/win95/util/se088352 …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- UNIX・Linux テキストファイルをページ番号付きでコマンドラインから印刷したい 1 2023/02/22 12:47
- フリーソフト テキストファイル内を検索したい 1 2022/06/01 08:33
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:48
- C言語・C++・C# C言語で 英文字のみからなる文字列、”Radar”、”WasItACatISaw”、”a”、””(空 5 2022/12/20 15:17
- Excel(エクセル) エクセル マクロ テキストファイルを取り込む 複数の区切り文字で別々のセルに格納するには? 3 2022/08/10 21:10
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/21 09:42
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/08 11:02
- Visual Basic(VBA) VBAでエクセルをtxtに変換するとエクセルでカンマを含む文字数字がtxtでは「""」付にならないよ 1 2022/08/27 12:17
- Excel(エクセル) 【VBA】指定フォルダに格納中のテキストファイルをエクセルで処理し結果のエクセルを新規フォルダに保存 1 2022/03/25 14:19
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelでdatファイルを作成??
-
batファイル処理でのテキストフ...
-
複数のテキストファイルをexcel...
-
複数のファイルを同時検索し、...
-
一気にずばっと複数のメールを...
-
バッチファイルが作成できない
-
ファイル名の特定文字だけ削除...
-
携帯のアプリ
-
WORD VBAでテキストファイルを...
-
メモ帳(テキストエディタ)に...
-
Windowsのメモ帳に何かを書いた...
-
拡張子が.txtのファイルに将来...
-
C言語を使用し、同じ内容のファ...
-
複数のテキストファイル(拡張...
-
マクロでメモ帳に貼り付け
-
VBSでテキストファイルのタブ区...
-
VBAでファイルパスが長すぎてコ...
-
Microsoft Access エラー 3051
-
OpenTextFile で書き込みできま...
-
HTMLプログラムにExcelをリンク...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
複数のテキストファイルをexcel...
-
Excelでdatファイルを作成??
-
バッチファイルが作成できない
-
batファイル処理でのテキストフ...
-
テキストファイルの文字色に色...
-
複数のファイルを同時検索し、...
-
一気にずばっと複数のメールを...
-
ファイル名の特定文字だけ削除...
-
CDの曲名をテキストファイルで...
-
VBSでテキストファイルのタブ区...
-
CADでグラフ作成
-
KADOKAWA電撃文庫ってフォーマ...
-
文字の頭文字順に自動移動
-
windowsへscp
-
マクロでメモ帳に貼り付け
-
powershell で出力したテキスト...
-
Atokのユーザー辞書に、複数の...
-
ExcelVBA テキストファイルから...
-
複数テキストファイルをエクセ...
-
インデザインのテキスト流し込み
おすすめ情報