Excel VBA質問箱 IV

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

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


6777 / 76735 ←次へ | 前へ→

【75555】マクロで、同じ番号行だけを残す方法
質問  ザ 焼鳥男  - 14/5/17(土) 15:05 -

引用なし
パスワード
   こんにちは、
Excel VBA初心者です。よろしく御願いします。

以下のマクロを教えて下さい。 
1、まずsheet1とsheet2がありsheet2を、新たに、新しいsheetにコピーして、タグ名を、「result」にします。
sheet1は、2列以降に情報が入力、sheet2は、5列以降に情報が入力されています。
2、「result」のD列に、sheet1のB列(名前)をコピーします。
3、sheet1のA列とsheet2のB列の番号を、比較して、同じ番号だけを残します。
4、「result」のNoを、1から連番にします。

<<シート:sheet11>>
  A  B  C D
1  No. 名前 性別
2 A01 梅尾 女
3 A02 福田 男
4 B01 石川 女
5 B02 森田 男
 
<<シート:sheet2>>
 A  B   C   D E
1 
2 タイトル(10セルを結合)
3 番号 No. 住所 年齢 特徴
4 同上 同上 同上 同上 同上← 3と4のセルを結合

~ 1 A01 東京 19歳 国語が得意← 5〜19のセルを結合
19
20
~ 2 A02 鹿児島 19歳 国語、国語、英語、数学、運動が得意← 20〜34のセルを結合 
34
35
~ 3 A03 アメリカ 19歳 数学が得意← 35〜49のセルを結合
49
50
~ 4 A04 長野 19歳 数学が得意← 50〜64のセルを結合
64
 
 <<シート:result>>

 
  A  B   C   D  E F
1 
2 タイトル(12セルを結合)
3 番号 No. 住所 名前 年齢 特徴
4 同上 同上 同上 同上 同上 同上← 3と4のセルを結合

~ 1 A01 東京 梅尾 19歳 国語が得意← 5〜19のセルを結合
19
20
~ 2 A02 鹿児島 福田 19歳 国語、国語、英語、←改行させる
数学、運動が得意← 20〜34のセルを結合
34
0 hits

【75555】マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/17(土) 15:05 質問
【75556】Re:マクロで、同じ番号行だけを残す方法 カエムワセト 14/5/17(土) 18:01 発言
【75557】Re:マクロで、同じ番号行だけを残す方法 カエムワセト 14/5/17(土) 18:03 発言
【75558】Re:マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/17(土) 19:39 発言
【75559】Re:マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/17(土) 19:40 発言
【75560】Re:マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/17(土) 19:46 回答
【75561】Re:マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/17(土) 21:22 発言
【75562】Re:マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/17(土) 22:51 発言
【75563】Re:マクロで、同じ番号行だけを残す方法 Yuki 14/5/18(日) 8:42 発言
【75564】Re:マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/18(日) 10:13 発言
【75565】Re:マクロで、同じ番号行だけを残す方法 Yuki 14/5/18(日) 11:30 発言
【75566】Re:マクロで、同じ番号行だけを残す方法 カエムワセト 14/5/18(日) 11:44 発言
【75567】Re:マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/18(日) 15:22 発言
【75568】Re:マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/18(日) 15:36 発言
【75569】Re:マクロで、同じ番号行だけを残す方法 Yuki 14/5/18(日) 16:55 発言
【75571】Re:マクロで、同じ番号行だけを残す方法 ザ 焼鳥男 14/5/18(日) 20:33 お礼
【75572】Re:マクロで、同じ番号行だけを残す方法 γ 14/5/18(日) 22:25 発言

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