返回列表 上一主題 發帖

[發問] 怎麼取有顏色儲存格內的值

本帖最後由 c_c_lai 於 2014-8-16 16:49 編輯

回復 7# GBKEE
  1.     Set Sh = ActiveSheet
  2.     ' Set A = Sh.Cells.Find("", AFTER:=Sh.Cells(Sh.Cells.Count), SearchFormat:=True) 'SearchFormat   選擇性的 Variant。搜尋的格式。
  3.     Set A = Sh.Cells.Find("", AFTER:=Sh.Cells(1), SearchFormat:=True) 'SearchFormat   選擇性的 Variant。搜尋的格式。
複製代碼
Sh.Cells(Sh.Cells.Count)=<溢位>
改成Sh.Cells(1) 便 OK 了。

TOP

        靜思自在 : 屋寬不如心寬。
返回列表 上一主題