如果在宏中打开文件，如何在 Excel 中自动勾选复选框答案

【问题标题】：How to make automatic tick on checkbox in Excel if the file is opened in Macro如果在宏中打开文件，如何在 Excel 中自动勾选复选框
【发布时间】：2019-03-24 07:13:29
【问题描述】：

我有一个 excel 文件，旁边有组合框和勾选框。我需要的是在打开文件后自动打勾。

ComboBox的代码是：

Private Sub CommandButton1_Click() 
Dim filecsv As Variant 
filecsv = Application.GetOpenFilename(FileFilter:="Excel Files,*.csv") 
If filecsv <> False Then 
Workbooks.Open Filename:=filecsv 
End If 
End Sub

你能帮我解决这个问题吗？

【问题讨论】：

标签： excel vba checkbox combobox

【解决方案1】：

使用……

CheckBoxes("CheckBoxName").Value = True

CheckBoxName 是您的 CheckBox 的名称。

替代解决方案：

Worksheets("Sheet1").OLEObjects("CheckBoxName").Object.Value = True

或

Worksheets("Sheet1").Shapes("CheckBoxName").ControlFormat.Value = 1

【讨论】：

那你做错了什么。 • 顺便说一下，“不工作” 不是错误描述。
我得到的错误是：方法 'Checkboxes' of Object '_Worksheet' failed
@OrkhanOrkhan 查看我的编辑。根据复选框的类型，其中之一必须有效。
我把你提到的行放在 END IF 之前，我得到了这样的错误：'Run-Time error '9' Subscript out of range'
@OrkhanOrkhan 该错误意味着工作表名称错误或复选框名称错误（或不存在）。这些解决方案中只有一个有效，具体取决于您使用的是表单控件还是 ActiveX 控件。