Board logo

標題: [發問] 無法找出最大值 [打印本頁]

作者: Helain    時間: 2011-11-5 12:40     標題: 無法找出最大值

不知道哪邊有問題
利用application.WorksheetFunction.Max
無法找出最大值
作者: oobird    時間: 2011-11-5 13:35

Application.WorksheetFunction.Max(Range(Cells(6, k), Cells(10, k)))
作者: Helain    時間: 2011-11-5 13:40

太粗心了!! 想說怎麼找不出來
謝謝大大
作者: GBKEE    時間: 2011-11-5 13:52

回復 1# Helain
Cells(11, k).Value = Application.WorksheetFunction.Max(Cells(6, k).Resize(4))
.Resize(4)=>.Resize(4,1)  : 將指定的範圍擴充為 (4列,1欄)範圍
作者: Helain    時間: 2011-11-5 14:40

可以問一下
resize通常在VBA是指什麼意思
還有個小小疑問
當我 set  ABC=     時,
一定都要在最後 寫入 set ABC = nothing嗎?
這又是指什麼意思呢??
作者: GBKEE    時間: 2011-11-5 15:38

回復 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 物件變數在記憶體中釋放掉 ,可減少佔用記憶體的資源




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)