123
返回列表 上一主題 發帖

[發問] 請教此程序錯在何處，如何改 ??

a8350070

帖子
48 
主題
2 
精華
0 
積分
64 
點名
0  
作業系統
xp 
軟體版本
office 2000 
閱讀權限
20 
性別
男 
來自
TAIPEI 
註冊時間
2011-4-16 
最後登錄
2018-9-26 
2# 跳轉到 »
發表於 2014-3-19 22:15 | 只看該作者
A返回的是區間中最大數值,是數值而非該數值所在的儲存格
而offset函數必先指定一個儲存格或範圍(物件)再去取得其位移參照
若指定的是一個數值而非物件,就會因找不到物件而發生錯誤

試試以下敘述

Sheets("Sheet6").[a10] = Sheets("Sheet6").[d19].Offset(WorksheetFunction.Match(Application.Large(Sheets("Sheet6").Range("ao20:ao350"), 1), Sheets("Sheet6").Range("ao20:ao350"), 0), 0)
My Blog
http://blog.xuite.net/a8350070

TOP

        靜思自在 : 滴水成河。粒米成蘿，勿輕己靈，勿以善小而不為。
123
返回列表 上一主題