返回列表 上一主題 發帖

[發問] 此巨集如何寫??

t8899

帖子
764 
主題
254 
精華
0 
積分
1031 
點名
0  
作業系統
windows 11 
軟體版本
OFFICE2021 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2025-4-16 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2013-1-30 20:21 | 顯示全部帖子

[發問] 此巨集如何寫??

e20到e200 為公式如下
e20=IF(Y20="","",Y20/(y20-z20))
e21=IF(Y21="","",Y21/(y21-z21))
.....
...
要移到e20到e200 之間倒數第一筆"不等於空白"的儲存格
巨集如何寫?
收藏 分享

t8899

帖子
764 
主題
254 
精華
0 
積分
1031 
點名
0  
作業系統
windows 11 
軟體版本
OFFICE2021 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2025-4-16 
2#
發表於 2013-1-30 20:32 | 顯示全部帖子
更改一下
是mouse 要移到e20到e200 之間倒數第一筆"不等於空白"的儲存格

TOP

t8899

帖子
764 
主題
254 
精華
0 
積分
1031 
點名
0  
作業系統
windows 11 
軟體版本
OFFICE2021 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2025-4-16 
3#
發表於 2013-1-31 06:28 | 顯示全部帖子
回復  t8899
kimbal 發表於 2013-1-30 22:11


謝謝!
這是另一個答案提供參考
Range("e" & [e20:e200].Find("*", SearchOrder:=xlByRows, LookIn:=xlValues, _
   SearchDirection:=xlPrevious).EntireRow.Row).Select

TOP

        靜思自在 : 信心、毅力、勇氣三者具備，則天下沒有做不成的事。
返回列表 上一主題