2025年4月29日 星期二

vba:清除ComboBox跟checkbox 設定與內容

 For Each ctrl In Me.Controls

 ' "Me" 指的是當前的 UserForm 物件,也可以替換成工作表名稱 EX SHEETS("SHEET1")

    ' 檢查Controls的類型是否為 CheckBox,透過TypeName檢查類別。

    If TypeName(ctrl) = "CheckBox" Then

      ' 將 CheckBox 的值設為 False (取消勾選)

      ctrl.Value = False

    End If    

    'ComboBox

    If TypeName(ctrl) = "ComboBox" Then

      ' 將 CheckBox 的值設為 False (取消勾選)

      ctrl.Value = ""

    End If

  Next ctrl

沒有留言:

張貼留言

職場毒癌:你憑什麼以為你十年寒窗,抵得我三代從商

你憑什麼以為你十年寒窗,抵得我三代從商——這句話已經記不得是從哪裡看到的,可能是某部劇,也可能是某篇 FB 文章標題。 但最近,特別有感。 為什麼會有這種感觸? 職場上有個同事,一路慢慢升到課長,好歹也是管理職,雖說不上鐵飯碗,但在多數人眼裡也算穩定。 結果呢?輾轉換了兩個製造課...