Excel VBA質問箱 IV

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

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


26225 / 76738 ←次へ | 前へ→

【55845】特定の行を、任意の複数箇所に挿入・コピーする方法
質問  taro  - 08/5/21(水) 11:32 -

引用なし
パスワード
   いきなりの具体例で恐縮です。
例えば、以下のような表があるとします。

  A       B   C  
1 表タイトル1
2 表タイトル2
3 整理番号   項目1 項目2 
4 21       --  -- 
5 21       --  -- 
6 22       --  --
7 22       --  --
8 23       --  --
9 23       --  --

このとき、A列(整理番号)が変わる行を境に、1・2行目(表タイトル1・
表タイトル2)を行ごと挿入コピーしたい場合、どのようにマクロを書けば
いいでしょうか。
上の例では、
 * 5行目と6行目の間に、1・2行目を行の挿入・コピーをする
 * 7行目と8行目の間に、1・2行目を行の挿入・コピーをする
ということになります。

なお、他の前提条件は以下のとおりです。
 * 21・22・23の整理番号は、この3つだけでなく約20種類あること
 * それぞれの整理番号の行数は、整理番号によって異なること
 * 毎月1回の更新処理を想定していて、同じ整理番号でも月によって
   行数は変動すること

丸投げのような質問で恐縮ですが、どなたかご教授いただければ
幸いです。
よろしくお願いいたします。
0 hits

【55845】特定の行を、任意の複数箇所に挿入・コピーする方法 taro 08/5/21(水) 11:32 質問
【55846】Re:特定の行を、任意の複数箇所に挿入・コ... テト 08/5/21(水) 11:54 発言
【55853】Re:特定の行を、任意の複数箇所に挿入・コ... taro 08/5/21(水) 13:47 発言
【55855】Re:特定の行を、任意の複数箇所に挿入・コ... テト 08/5/21(水) 13:56 発言
【55860】Re:特定の行を、任意の複数箇所に挿入・コ... taro 08/5/21(水) 14:18 お礼
【55849】Re:特定の行を、任意の複数箇所に挿入・コ... kanabun 08/5/21(水) 13:29 発言
【55852】Re:特定の行を、任意の複数箇所に挿入・コ... taro 08/5/21(水) 13:46 発言
【55859】Re:特定の行を、任意の複数箇所に挿入・コ... kanabun 08/5/21(水) 14:11 発言
【55861】Re:特定の行を、任意の複数箇所に挿入・コ... taro 08/5/21(水) 14:19 お礼

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