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

---

作者: 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/)