返回列表 上一主題 發帖

如何將同檔案中兩sheet作比較，再將比較結果另存其他sheet中?

ckl520

帖子
6 
主題
2 
精華
0 
積分
8 
點名
0  
作業系統
windows 
軟體版本
Win2000 
閱讀權限
10 
性別
男 
註冊時間
2012-5-23 
最後登錄
2013-8-13 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-5-24 15:18 | 顯示全部帖子

如何將同檔案中兩sheet作比較，再將比較結果另存其他sheet中?

vba小嫩咖遇到問題，需要將同檔案中兩sheet作比較，再將比較結果
另存其他sheet中。如下所敘，懇請各位高手大大幫忙。
thanks~

如何比對sheet2 & Sheet3資料，並將比對結果
存於其他sheet中
1.兩者都有-->sheet4
2.sheet2有，sheet3沒有-->Sheet5
3.Sheet3有，sheet2沒有-->Sheet6

shee2 資料如圖fig.1
sheet3 資料如圖fig.2

A.jpg (15.38 KB)

fig.1

A.jpg

b.jpg (25.1 KB)

fig.2

b.jpg

收藏 分享

ckl520

帖子
6 
主題
2 
精華
0 
積分
8 
點名
0  
作業系統
windows 
軟體版本
Win2000 
閱讀權限
10 
性別
男 
註冊時間
2012-5-23 
最後登錄
2013-8-13 
2#
發表於 2012-6-1 15:09 | 顯示全部帖子
register313  大大 你好:

1.套用後，程式會卡在這行 Sheet4.[A2].Resize(UBound(Br, 1), 2) = Br

2.已查過網上資料，但還是看不太懂，無法排障。能煩請大大分段解釋程式意思。

再次感謝高手幫忙。
thanks~

TOP

ckl520

帖子
6 
主題
2 
精華
0 
積分
8 
點名
0  
作業系統
windows 
軟體版本
Win2000 
閱讀權限
10 
性別
男 
註冊時間
2012-5-23 
最後登錄
2013-8-13 
3#
發表於 2012-6-1 17:46 | 顯示全部帖子
TO:register313
http://www.badongo.com/file/27212832

thanks~

TOP

ckl520

帖子
6 
主題
2 
精華
0 
積分
8 
點名
0  
作業系統
windows 
軟體版本
Win2000 
閱讀權限
10 
性別
男 
註冊時間
2012-5-23 
最後登錄
2013-8-13 
4#
發表於 2012-6-4 17:43 | 顯示全部帖子
謝謝register313 大大
可以work了!

TOP

        靜思自在 : 是非當教育，讚美作警惕。
返回列表 上一主題