|    | 
     【Excel VBA】コピー&ペーストの自動化 
以下のエクセル表があり、同じ日付ごとのデータを自動的に別のシートに移したいです。 
例えば、別のシートに、2004/1/1に書かれているデータのみを移す。(シート2参照) 
 
それをVBAで書くにはどうすればいいでしょうか。 
マクロの記録をするのではなく、この表の日付を増やしたり変えたりしても機能するようにコードを書きたいと思っております。 
 
For LoopとIf thenを使い、A1セルがそれより下のセルの値と異なるまでコピーし続ける、、といった作業をすればよいのでしょうか。 
 
全くの初心者で勉強中です。よろしくお願いいたします。 
 
列行 A B 
1 2004/1/1 太郎 
2 2004/1/1 次郎 
3 2004/1/1 三郎 
4 2004/1/1 一郎 
5 2004/1/1 五郎 
6 2005/3/3 三郎 
7 2005/3/3 次郎 
8 2005/3/3 太郎 
9 2005/3/3 四朗 
10 2006/2/2 次郎 
11 2006/2/2 一郎 
12 2006/2/2 太郎 
 
 
シート2 
2004/1/1 
太郎 
次郎 
三郎 
一郎 
五郎 
 
 
シート3 
2005/3/3 
三郎 
次郎 
太郎 
四朗 
 
 
シート4 
2006/2/2 
次郎 
一郎 
太郎 
 | 
     
    
   |