[VBA] 如何將「核取方塊」變大 ? (方法2)

更新於 發佈於 閱讀時間約 2 分鐘

此 (方法2) 是利用 Meiko微課頻道

Excel教學 E100 | 如何把核取方塊變大,打勾還可以填入當下日期與時間(快版)

,所產生的靈感而設計!


【詳細講解版本 E103】,請參考以下連結:

Excel教學 E103| 如何把核取方塊變大,打勾可以填入當下日期與時間(講解版)



前言:

這是第2種方法,如果你還沒看過第1種方法,請參考 [VBA] 如何將「核取方塊」變大 ? (方法1)


當時,某論壇的某網友提問,除了 Excel 系統內提供的核取方塊有【儲存格連結】的功能,其它方法所做成的核取方塊,是否也能做到這個功能 ?
而那位高手當時也僅僅是使用 VBA 將文字方塊做出一個類似核取方塊的樣子 ( 可以做勾選與取消 ),並沒有提供【儲存格連結】的功能要怎麼做出來 ! 然而當時的我根本看不懂高手的程式碼 ...

相隔 10 年之久,在偶然的機會下,又再次看到這篇文章,索性再把高手的程式碼看一遍,竟然知道它在幹麻了 !! 很神奇 !! 我很激動也很感動 !! 代表 10 多年來,我吃的白米沒有浪費阿 ~

這次將高手的 VBA 理解後修改,並加入自己開發的【儲存格連結】功能,大成功 !! 但是有它的限制在。


作法:

  1. 新增一個橫的文字方塊。
  2. 將此文字方塊的名稱設定為,
    CB_你想要的名稱_是否開啟儲存格連結_儲存格位置,中間用底線做為區隔。
    例如:CB_MyCheckBox_1_A6,意義如下:
    CB:程式會將物件名稱為「CB_」開頭的做為執行對象
    MyCheckBox:可任意設定(中文、英文、數字),
    但不可包含底線、空白或其它特殊字元
    1:代表 要開啟 【儲存格連結】的功能。0 則表示要關閉。
    A6:代表 在 A6 儲存格位置顯示 TRUE 或 FALSE。
  3. 在文字方塊的內容最開頭,先輸入【2 個半形空白】,再輸入想要的文字。
  4. 進入 VBA 編輯視窗,插入一個模組,並將程式碼貼上。
  5. 將此文字方塊,指定巨集為 Set_CheckBox ,按下確定。
  6. 完成,即可操作了。


成果:

以下是成果影片,請欣賞~ 謝謝。




特別感謝

感謝 Chyi 奇大哥 在針對 方框 的【勾選】與【未勾選】狀態上的建議,讓此作品的呈現更加完美!

方框的【勾選】與【未勾選】 - 字型 與 字元代碼 與 VBA  對照表

方框的【勾選】與【未勾選】 - 字型 與 字元代碼 與 VBA 對照表



檔案下載



注意事項

此設計的【儲存格連結】功能為絕對位址,並不會因為新增或刪減 《欄或列》 而變更,請特別留意。



彩蛋

【時間】花在哪,【成就】就在哪。



以上就是這次的分享,請持續關注 和 Meiko微課頻道,謝謝大家 ~

有任何問題,請在下方留言討論,或加入 LINE社群 Meiko微課小綠群(粉絲交流群),歡迎您的加入。



留言
avatar-img
留言分享你的想法!
avatar-img
Meiko微課頻道的沙龍
146會員
47內容數
Meiko微課頻道主要以辦公室應用為出發點,針對上班族群所遇到的問題進行分享
2025/04/06
本篇文章分享如何使用 Excel VBA 程式碼去除 Excel 儲存格裡文字或英文句子前後的空白,提供【基礎版】和【進階版】兩種 VBA 程式碼範例,並比較其功能差異。進階版程式碼可以保留句子中間的空白,只去除句子頭尾的空白。文章也包含程式碼下載連結以及相關參考資源。
Thumbnail
2025/04/06
本篇文章分享如何使用 Excel VBA 程式碼去除 Excel 儲存格裡文字或英文句子前後的空白,提供【基礎版】和【進階版】兩種 VBA 程式碼範例,並比較其功能差異。進階版程式碼可以保留句子中間的空白,只去除句子頭尾的空白。文章也包含程式碼下載連結以及相關參考資源。
Thumbnail
2025/03/18
本文說明如何使用Excel函數 SUMPRODUCT 和 IFERROR 和 SUBSTITUTE 解決數值加總顯示問題,並提供檔案範例和公式說明。此外,文章還包含一些與【太極拳】相關的參考資料連結。
Thumbnail
2025/03/18
本文說明如何使用Excel函數 SUMPRODUCT 和 IFERROR 和 SUBSTITUTE 解決數值加總顯示問題,並提供檔案範例和公式說明。此外,文章還包含一些與【太極拳】相關的參考資料連結。
Thumbnail
2025/01/08
本篇文章提供一個利用 Excel VBA 和 Google Map API,自動計算起迄地址里程數的解決方案。分享開發過程的心路歷程,以及如何克服使用Google Map API的挑戰,並感謝 Meiko老師 的教學 和 ChatGPT o1 pro 的協助,並提供檔案免費下載。
Thumbnail
2025/01/08
本篇文章提供一個利用 Excel VBA 和 Google Map API,自動計算起迄地址里程數的解決方案。分享開發過程的心路歷程,以及如何克服使用Google Map API的挑戰,並感謝 Meiko老師 的教學 和 ChatGPT o1 pro 的協助,並提供檔案免費下載。
Thumbnail
看更多