Word VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


28 / 840 ←次へ | 前へ→

【837】Re:各ページ各行それぞれ違う文字列の挿入
発言  亀マスター  - 18/2/7(水) 21:38 -

引用なし
パスワード
   >データの空白行に改行記号がついていないので、ページの最終行にカーソルを置いて次の行へ移動すると次ページの1行目になります。(2番の「次の行へ移動」させた後にMsgBoxで行を表示させてみたら、やはり1でした。)

各ページは1〜10行目になんらかの文字列があり、続いて参照する項目があればそれが入る。その後、改行記号の連打ではなく空白(つまり改ページが入っている)ということでいいでしょうか。

> それから、最終行でなかった場合の処理というのは
>1行下の列に移動して、また1番から繰り返すということでしょうか。(ページ毎のループに入れてよいのでしょうか?)

私が示したコードは、今現在カーソルのある位置が最終行かどうかを判定するだけのものですので、現在の最終行の下に何か1行を加えるという目的であれば、少し手順を変えた方がいいかもですね。(基本的な考え方は同じです)

1.カーソルを次の行に移動
2.現在のカーソルが1行目かどうかを判定
3.1行目なら先ほどの行が最終行だったということなので、前の行に戻る
  1行目でなければ1行目になるまで1.〜2.を繰り返す
4.現在の行(最終行)の末尾にカーソルを移動
5.改行
6.挿入したい文章を加える

という感じですか。


>試しに1ページ目の最終行にカーソルを置いてこのコードを実行させると、1ページ目の次ページの1行目に挿入されました。

このコードというのがどういうものかわかりませんので、現在のコードの全体を示してもらえると助かります。

70 hits

【829】各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/2(金) 10:58 質問[未読]
【830】Re:各ページ各行それぞれ違う文字列の挿入 亀マスター 18/2/2(金) 23:06 発言[未読]
【831】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/5(月) 9:30 質問[未読]
【832】Re:各ページ各行それぞれ違う文字列の挿入 亀マスター 18/2/5(月) 13:19 回答[未読]
【833】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/6(火) 11:14 質問[未読]
【835】Re:各ページ各行それぞれ違う文字列の挿入 亀マスター 18/2/6(火) 19:41 回答[未読]
【836】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/7(水) 14:03 質問[未読]
【837】Re:各ページ各行それぞれ違う文字列の挿入 亀マスター 18/2/7(水) 21:38 発言[未読]
【838】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/9(金) 12:47 質問[未読]
【839】Re:各ページ各行それぞれ違う文字列の挿入 亀マスター 18/2/10(土) 0:08 回答[未読]
【844】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/13(火) 12:48 質問[未読]
【848】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/14(水) 10:31 質問[未読]
【849】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/14(水) 11:05 お礼[未読]
【842】Re:各ページ各行それぞれ違う文字列の挿入 マナ 18/2/10(土) 15:00 発言[未読]
【845】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/13(火) 14:12 質問[未読]
【846】Re:各ページ各行それぞれ違う文字列の挿入 マナ 18/2/13(火) 19:54 発言[未読]
【847】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/14(水) 10:22 発言[未読]
【850】Re:各ページ各行それぞれ違う文字列の挿入 マナ 18/2/14(水) 19:51 発言[未読]
【851】Re:各ページ各行それぞれ違う文字列の挿入 あかよん 18/2/15(木) 14:03 お礼[未読]

28 / 840 ←次へ | 前へ→
ページ:  ┃  記事番号:
199952
(SS)C-BOARD v3.8 is Free