返回列表 上一主題 發帖

[發問] 急！請問高人可以幫忙解決我的問題？

stillfish00

帖子
1018 
主題
15 
精華
0 
積分
1058 
點名
0  
作業系統
win7 32bit 
軟體版本
Office 2016 64-bit 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2012-5-9 
最後登錄
2022-9-28 
1# 跳轉到 »
發表於 2012-11-17 08:37 | 顯示全部帖子
本帖最後由 stillfish00 於 2012-11-17 08:40 編輯

回復 1# 198188
試試  Set FRng = wb.Sheets("New form of payment report").Range("B:B").Find(A, lookat:=xlWhole, SearchDirection:=xlPrevious)

TOP

stillfish00

帖子
1018 
主題
15 
精華
0 
積分
1058 
點名
0  
作業系統
win7 32bit 
軟體版本
Office 2016 64-bit 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2012-5-9 
最後登錄
2022-9-28 
2#
發表於 2012-11-17 11:32 | 顯示全部帖子
本帖最後由 stillfish00 於 2012-11-17 11:33 編輯

回復 4# 198188

因為工作表 "2012" 的 [A3055] 為空白

For Each A In .Range(.[A2], .Range("A1").End(xlDown))
[A3055]以下的都不會跑到

TOP

        靜思自在 : 每天無所事事，是人生的消費者，積極、有用才是人生的創造者。
返回列表 上一主題