Infoment https://blog.hatena.ne.jp/Infoment/ Infomentのブログ ～Excel VBA奮闘記～ https://infoment.hatenablog.com/ Excel VBA クラスモジュール 作ってみた 昨日は、二次元配列で任意の一行に対し何某かを挿入する際、xlUPとxlDownを選択できるようにした。 infoment.hatenablog.comこの結果を踏まえ、先日の ↓ に再挑戦する。 infoment.hatenablog.com昨日も紹介したように、xlUPで上に押し上げるということは、指定行を一つ下に下げてxlDownするのと同じこと。この部分はたびたび登場するので、切り出して関数化した。 ' シフトの方向による、挿入対象列との差分を求める。 ' xlDown ・・・０ ' xlUp ・・・１ Private Function dr(row_shift As Excel.XlD… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Finfoment.hatenablog.com%2Fentry%2F2019%2F09%2F03%2F204831" title="二次元配列で任意の一行をカット＆挿入（再挑戦） - Infomentのブログ ～Excel VBA奮闘記～" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/I/Infoment/20190903/20190903200435.png Hatena Blog https://hatena.blog 2019-09-03 20:48:31 rich https://infoment.hatenablog.com/entry/2019/09/03/204831 1.0 100%