標題: [發問] 如何於執行完程式後 將滑鼠點選於最先出現價位的地方 [打印本頁]

---

作者: lcctno    時間: 2015-12-20 15:29     標題: 如何於執行完程式後 將滑鼠點選於最先出現價位的地方

請問VBA之寫法  
如何於執行完程式後 將滑鼠點選於最先出現價位的地方 如範例是17.82
謝謝教導


[attach]22896[/attach]

[attach]22897[/attach]

---

作者: yen956    時間: 2015-12-21 12:52

試試看:
sub test()
    dim Rng as range
    set Rng=activecell
'原VBACode
'~~
'~~
    Rng.select
end sub

---

作者: 准提部林    時間: 2015-12-21 13:12

後加 [C:C].Find("*").Select

---

作者: Joforn    時間: 2015-12-21 20:52

Range("C2").End(xlDown).Select

---

作者: Joforn    時間: 2015-12-21 20:57

對不起，上面的回復是錯誤的。3#的正解。

---

作者: c_c_lai    時間: 2015-12-22 07:11

本帖最後由 c_c_lai 於 2015-12-22 07:13 編輯

回復 1# lcctno
回復 3# 准提部林
正如三樓 (3#) 准提部林 版大提示。
但

1. Sub Ex()
   
2.     [C:C].Find("*").Select
   
3. End Sub

複製代碼

如修改成

1. Sub Ex()
   
2.     [C:C].Find("1*").Select
   
3. End Sub

複製代碼

更佳。
(你可以試著在 1955 列 17.82 之上的 C 欄
任何欄位內輸入 0 或是 0.5 等等數值，當然
涵蓋 C2 欄在內，即會觀察到 Cursor (游標)
Focus (焦點) 的欄位會有所不同 ("*" 以及 "1*"))。

---

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