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

沒有留言:

張貼留言

集保庫存:辛苦了