Insertしたら項番がうまく変わってくれない | |
---|---|
[194588] Insertしたら項番がうまく変わってくれない- ■親トピック/記事引用/メール受信=OFF■ □投稿者/ nil -(2022/01/08(15:18)) □U R L/ マクロ初心者です。エクセルは2016, OSはWindows10を使っています。 A列には項番が入っています。 A11 は 1 A12 は A11+1 (⇒2と表示) A13 は A12+1 (⇒3と表示) となっています。 A11の行を2行、A18行に追加させるマクロを実行させて A18 は A17+1 (⇒8と表示とさせたい) A19 は A18+1 (⇒9と表示とさせたい) としたいのですが実際は A18 は A11+1 (⇒2と表示されてしまう) A19 は A12+1 (⇒3と表示されてしまう) となってしまいます。 どうしたら良いでしょうか?(涙) ※マクロの問題ではないかもしれません 実際は 変数「開始行」と「追加行数」は 使用者がMSGBOXから手入力できるようにしています。 どなたがアドバイスをよろしくお願いします。 〓自分が使ったマクロ〓〓 Sub 行追加() 開始行 = 18 追加行数 = 2 終了行 = 12 + 追加行数 Range("12:" & 終了行).Copy Rows(開始行).Insert shift:=xlShiftDown Application.CutCopyMode = False End sub この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他 |
[194589] Re[1]: Insertしたら項番がうまく変わってくれない- ■記事引用/メール受信=OFF■ □投稿者/ 幻を見た -(2022/01/08(18:23)) □U R L/ まずは、新規ブックにてご自分で書かれた質問を 試してから質問しなおしてください。 >A18 は A17+1 (⇒8と表示とさせたい) >A19 は A18+1 (⇒9と表示とさせたい >A18 は A11+1 (⇒2と表示されてしまう) >A19 は A12+1 (⇒3と表示されてしまう) どちらもありえない幻想です。 |
[194591] Re[2]: Insertしたら項番がうまく変わってくれない- ■ / 記事引用/メール受信=OFF■ □投稿者/ nil -(2022/01/09(10:54)) □U R L/ 幻を見たさん、 こんにちは。お返事ありがとうございます。 新規ブックで試してみると、私が記載した動きにはならないです… 質問の文章が間違っているみたいです。 一度質問をとじさせていただきます。 申し訳ありませんでした。 |
このトピックに書きこむ |
---|