返回列表 上一主題 發帖

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

t8899

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

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

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

t8899

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

TOP

t8899

帖子
766 
主題
256 
精華
0 
積分
1035 
點名
0  
作業系統
windows 11 
軟體版本
OFFICE2021 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2026-10-2 
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

        靜思自在 : 唯其尊重自己的人，才更勇於縮小自己。
返回列表 上一主題