[過去ﾛｸﾞ] Excel VBA 質問スレ Part68 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
456: (ﾜｯﾁｮｲ ffad-gZNM) 2020/10/02(金)16:51 ID:p6rjz1Jr0(1) AAS
>>453
配列のUpperが何を意味してるのかいまいち分からんがこんな感じで良いんか？
Line Input #1, TargetDate
BeforeArray(0, Ubound(BeforeArray, 2)) = ファイル名
For文[1〜190](BeforeArrayにSplit(TargetDate, ″,″)を放り込む)
ReDim Preserve BeforeArray(0 to 190, Ubound(BeforeArray, 2)+1)
Do Until EOF(1)
Line Input #1, TargetDate
For文[1〜190](BeforeArrayにSplit(TargetDate, ″,″)を放り込む)
ReDim Preserve BeforeArray(0 to 190, Ubound(BeforeArray, 2)+1)
省1
457: (ﾜｯﾁｮｲ d3da-Kk5w) 2020/10/02(金)18:32 ID:a296oIK60(2/2) AAS
>>453
こういうことじゃないのか
targetdata = buf & "," & targetdata
458: (ﾜｯﾁｮｲ e3da-Kk5w) 2020/10/02(金)22:17 ID:MWdBgx4Q0(2/2) AAS
>>455
サイドブレーキを使う坂道発進をダサイと感じるようなもので、
どう考えてもシート格納が合理的なのに、無理して配列を使うわけですよ。
459(1): (ﾜｯﾁｮｲ d32c-G8Sl) 2020/10/02(金)23:43 ID:ooD45Zz30(2/2) AAS
CSV の規格では、各要素をクォート文字で囲めば、
各要素中に、列区切り文字も入れられる
"a,b", x
Ruby などのCSVライブラリを使わず、
自力で、列区切り文字で分割すると、バグるだけ
CSVの規格を知らない香具師が、よくやってる
460(1): (ﾜｯﾁｮｲ 7f4b-3DJV) 2020/10/03(土)00:18 ID:DSTQ9BDR0(1/2) AAS
csvに規格ってあったんだ
461: (ﾜｯﾁｮｲ f35f-MSJL) 2020/10/03(土)07:11 ID:umHauNXS0(1) AAS
ExcelでCSVをダブルクリックで開いて編集、上書きして事故る人が多いね
462: (ﾜｯﾁｮｲ ff01-V07v) 2020/10/03(土)07:17 ID:NCQ7EVNV0(1) AAS
>>460
一応あるけど結局Excelで読めないとダメって言うケースが大多数だったりする
外部ﾘﾝｸ:www.kasai.fm
463: (ﾜｯﾁｮｲ 53ce-2+Dn) 2020/10/03(土)08:43 ID:2jz2H7gQ0(1) AAS
そのRFCって、たくさんあるローカルルールの1つを紹介してるだけだよな
強制力もなさそうだし、現時点ではあんまり意味がなさそう
464: (ﾜｯﾁｮｲ f35f-67ZW) 2020/10/03(土)11:51 ID:ylT9+9xh0(1) AAS
>>459
マイクロソフトの製品はそれに沿っているものがあるが、クォーテーションがついたり、つかなかったりするのは、人間にとってもタチが悪く、完全に失敗した仕様と結論が出ている。
465(1): 459 (ﾜｯﾁｮｲ d32c-IT45) 2020/10/03(土)13:01 ID:/wA+nWqo0(1/2) AAS
列区切り文字は、必要なければ省略できる
つまり、x も、"x" も同じ。
全ての要素に、付けてもよい
ただし、"a,b" みたいに要素内に、
行区切り文字・列区切り文字・クォート文字を含む場合は、省略できない
466: 459 (ﾜｯﾁｮｲ d32c-IT45) 2020/10/03(土)13:03 ID:/wA+nWqo0(2/2) AAS
>>465
修正
>列区切り文字は、必要なければ省略できる
クォート文字は、必要なければ省略できる
467: (ﾜｯﾁｮｲ 7f4b-3DJV) 2020/10/03(土)13:04 ID:DSTQ9BDR0(2/2) AAS
できないって言われましても強制力無いですし
468: (ﾜｯﾁｮｲ ff2f-G8Sl) 2020/10/03(土)13:34 ID:zZGrTJee0(1) AAS
まあそもそも多数の実装が出てからそれ集めて決めた仕様だからな
469: (ﾜｯﾁｮｲ e3da-Kk5w) 2020/10/03(土)19:43 ID:WrZNWJut0(1) AAS
そういやあれ何だろうな。
QueryTableだとセル内改行でずれるのに、
ADOだとずれないとか。
470: (ﾜｯﾁｮｲ 6309-gW4a) 2020/10/04(日)19:09 ID:mqiPq7lq0(1/3) AAS
配列を戻す自作関数を呼び出し先Subから複数回実行して、配列を結合したい
んだけど、どうすればできますか？ redim preserveとUBoundを使うのかも
しれないけど、いい感じにまとまったコードが書けない。
例えば、下の関数を、別のSubから2回実行させて、
「Ary(3) ※中身：path1,path2,path1,path2」
の結果を得たいです。
Function TestFunc()
Dim testPath(1)
testPath(0) = "path1"
testPath(1) = "path2"
省3
471(3): (ﾜｯﾁｮｲ 6309-gW4a) 2020/10/04(日)19:09 ID:mqiPq7lq0(2/3) AAS
配列を戻す自作関数を呼び出し先Subから複数回実行して、配列を結合したい
んだけど、どうすればできますか？ redim preserveとUBoundを使うのかも
しれないけど、いい感じにまとまったコードが書けない。
例えば、下の関数を、別のSubから2回実行させて、
「Ary(3) ※中身：path1,path2,path1,path2」
の結果を得たいです。
Function TestFunc()
Dim testPath(1)
testPath(0) = "path1"
testPath(1) = "path2"
省3
472: (ﾜｯﾁｮｲ 6309-gW4a) 2020/10/04(日)19:09 ID:mqiPq7lq0(3/3) AAS
連投すいません
473: (ｽｯｯﾌﾟ Sd1f-+ya4) 2020/10/04(日)19:15 ID:l1LxtJm7d(1) AAS
注意
ID:mqiPq7lq0
いつもの馬鹿です
474: (ﾜｯﾁｮｲ d3da-Kk5w) 2020/10/04(日)21:13 ID:3bz1Ts/P0(1) AAS
>>471
検索したらいいんじゃね
475(1): (ﾜｯﾁｮｲ b37c-Uy5C) 2020/10/04(日)21:42 ID:NRUY+ZF00(1) AAS
>>471
例えとかいい感じとかじゃなくて正確にコードを提示してどの部分をどうしたいのか明確に説明した方がいいよ
上下前次1-新書関写板覧索設栞歴
あと 527 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.023s