|
はじめまして、VBA初心者です。
下記の移動後のように移動をさせたいのですが
条件があり困っております。
条件とは、sheet1のA列とsheet2のA列が同じ値の時、(sheet1 A1= sheet2 A1など A1〜A15まで比較)
sheet1のA欄と同じ値の行のB列にsheet2 Aの値をコピーできるようにしたいです。
一致しない値はそのままコピーなしです。
VBAでこのようなことは可能でしょうか?結果は下記の2.移動後のとうりに
したいです。毎回「A」の値は変わるので変わることを考慮できるように
したいっです。
すいませんがご教授いただきますようお願いします。
-----------------------------------------------------------
1.移動前
sheet1 sheet2
A B C D A B C D E
1 0.8 1 0.8 国 0.81 TN
2 1.2 2 1.3 数 1.31 BN
3 1.6 3 1.6 理 1.61 BN
4 1.7 4 2.0 家 2.01 TN
5 2.0 5 2.1 図 2.11 BN
.
.
5 5.5
---------------------------------------------------------------
2.移動後
sheet1 sheet2
A B C D A B C D E
1 0.8 0.8 国 0.81 1 0.8 国 0.81 TN
2 1.2 2 1.3 数 1.31 BN
3 1.6 1.6 理 1.61 ← 3 1.6 理 1.61 BN
4 1.7 4 2.0 家 2.01 TN
5 2.0 2.0 家 2.1 5 2.1 図 2.11 BN
.
.
15 5.5
|
|