Q&A
なぜACCESS-VBAなのですか？
VBScriptやPowershellという選択肢もあります。
バッチファイルを使用して128カラム毎に改行する処理を作成しようとしたのですが、
変数に8190文字以上入れると不具合を起こすようで、上手くいきませんでした。
ですので、ACCESS VBAを利用して実現しようとしています。
128カラム毎だと大変なので、10カラム毎に改行する処理を考えますと、、、
AA12345678BB%abcdefgCC 2 4 6 8DD% b d f EE12345678
のようなtxtデータを以下のように更新したいと考えています。
AA12345678
BB%abcdefg
CC 2 4 6 8
DD% b d f
EE12345678
実際の文字列は8190文字以上を想定している為、EE12345678より先もある（5行以上で変動する）
パターンで考えたいと思います。。
後続の処理として、改行後のデータをＡＣＣＥＳＳのデータベースに取り込もうとしている為になります。
既に128カラム改行のデータを取り込む処理はＡＣＣＥＳＳにて出来ている為、同時に記述をした方が、管理しやすいかな、、と思いまして。
とはいえ、PowerShellなどであっさり出来るようでしたら、そちらも検討する必要があるのかもしれません。。
改行して意味ありますか。
出力形式はまさかaccessじゃないですよね。
縦持ちのデータに変換したいという質問だと
しっくりくると思いますけど
改行だとまた意味が変わります。
どのような内容のファイルなのでしょう？（日本語をコードに変換したような感じがしますけど）
128カラムとか10カラムと言われているのは何ですか？（バイト数の事ですか？それとも文字数？）
128を10では割り切れませんが大丈夫なんですか？
またそれは文字の途中で区切られる事が無いまたは区切られても大丈夫なのでしょうか？
> バッチファイルを使用して128カラム毎に改行する処理を作成しようとしたのですが、
> 変数に8190文字以上入れると不具合を起こすようで、上手くいきませんでした。
変数に格納できるサイズだけの話なら、VBAのString型を使用すれば良いだけの話だと思いますけど、解決したい問題は何ですか？
＞＞mako1972
>> sazi
すみません、128byteの事です。
横長のデータなのですが、実際は128byte毎の明細になっていて、
128byteで改行すると、マルチフォーマットのデータになります。
各行の先頭2byteが判別記号になっている為、その部分を読みたい、かつ見やすくする為128byteで改行したいと思っています。
意図としては、下と同じ事をVBAでする場合、どのように記述すれば良いものか
調べても分からなかったもので、、
----------------------------------------
@echo off
setlocal enabledelayedexpansion
(
for /f "delims=" %%A in (INPUT.txt) do call :SUB "%%~A"
)>OUTPUT.txt
type OUTPUT.txt
exit /b
:SUB
set "A=%~1"
set N=0
:LOOP
if "!A:~%N%,128!"=="" exit /b
echo=!A:~%N%,128!
set /a N+=128
goto LOOP
回答1件
0
ベストアンサー
ファイルを読み取りでOPENし、InputBを使用すれば、特定のバイト数毎に順次読み取れるので、目的に合致しているのではないかと思います。
ファイルへ書き戻すのではなく、そのままテーブルに追加するようにする方が効率的だと思います。
投稿2020/08/12 05:15
編集2020/08/12 05:21総合スコア25184
どこにマイナス評価される理由があるのかさっぱりです。
質問者以外で、理由も付けずに、マイナス評価する位なら、別途回答されると気付く点もあるのですが。
回答してくださりありがとうございます。
とっかかりが無かったので、まずはここから調べてみます。
あなたの回答
tips
プレビュー
