返回列表 上一主題 發帖

[發問] 無法找出最大值

[發問] 無法找出最大值

不知道哪邊有問題
利用application.WorksheetFunction.Max
無法找出最大值

無法找出最大值.rar (10.35 KB)

Application.WorksheetFunction.Max(Range(Cells(6, k), Cells(10, k)))

TOP

太粗心了!! 想說怎麼找不出來
謝謝大大

TOP

回復 1# Helain
Cells(11, k).Value = Application.WorksheetFunction.Max(Cells(6, k).Resize(4))
.Resize(4)=>.Resize(4,1)  : 將指定的範圍擴充為 (4列,1欄)範圍

TOP

可以問一下
resize通常在VBA是指什麼意思
還有個小小疑問
當我 set  ABC=     時,
一定都要在最後 寫入 set ABC = nothing嗎?
這又是指什麼意思呢??

TOP

回復 5# Helain
  1. Sub Ex()
  2.     Dim abc As Object
  3.     Set abc = [b3]
  4.     MsgBox abc.Address
  5.     Set abc = abc.Resize(5, 5)
  6.     MsgBox abc.Address
  7. End Sub
複製代碼
Set abc = Nothing
不一定要有的.
是將 abc 物件變數在記憶體中釋放掉 ,可減少佔用記憶體的資源

TOP

        靜思自在 : 願要大、志要堅、氣要柔、心要細。
返回列表 上一主題