复选框（Check Box）的实例应用

【分享成果，欢乐正能量】不再因失去而后悔，不再因失去而悲伤，不再因误解而愤怒，不再因困难而气馁。过真实的生活，快乐地行走。风雨让他摇摆得美丽，疼痛让他温柔地来。如果有一天，我们能够安然地老去，与溪水为伴，放眼望去青山遍野，那么生命的轮回就不算虚度。如果你还是不该，那是因为你这一生记住了太多。

《Excel应用程序与VBA》是经典。这是我推出的第七套教程，面向初学者。本教程系列从简单的宏记录开始，然后继续构建表单。内容丰富，实例较多。每个人都可以很容易地掌握相关知识。本教程系列由三卷十七章组成。这些都是我们在使用EXCEL时需要掌握的知识点。今天讲解的是《VBAEXCEL应用》第15章“ActiveX控件”第10节：CheckBox应用示例。

第10节复选框

大家好，今天我们来讲解一下checkbox控件Checkbox是一个可以选择的控件，用来存储信息。这个控件在电子表格中用得不多，大多用在表单中，但我们还是把它作为一个知识点来解释。

1在工作表窗口中添加复选框控件

要在ExcelVBA中创建复选框，可以执行以下步骤：在“开发人员”选项卡中，单击“ActiveX控件”组中的“插入”，单击复选框；

在工作表上拖动鼠标以将复选框添加到工作表。如下：

2将复选框更改为自定义属性

要根据我们需要的结果固定工作表上的复选框显示项，我们可以单击选中工作表上的复选框，右键单击它，然后单击“属性”。请注意，它必须处于“设计模式”。时间。

将出现以下属性对话框，我们将找到“caption”属性：

将此值固定为“确认”：

现在，工作表窗口中的复选框显示“确认”。

3复选框控件的实际应用

将以下代码添加到工作表的私有表单中：

PrivateSubCheckBox1Click()

IfCheckBox1ValueTrueThenRange('D2')Value1

IfCheckBox1ValueFalseThenRange('D2')Value0

结束子

代码截图：

代码解释：

1)IfCheckBox1ValueTrueThenRange('D2')Value1如果复选框被选中，则在单元格D2中记录1

2)IfCheckBox1ValueFalseThenRange('D2')Value0如果未选中复选框，则在单元格D2中输入0

实际运行结果（注意退出设计模式）：

今日内容回顾：

1）如何在工作表中添加复选框按钮？

2）如何将复选框按钮绑定到工作表中的工作表单元格值？

本课内容参考程序文件：Workbook15xlsm

分享成果，享受正能量

VBA学习教程（初级、中级、高级）：

VBA是利用Office实现小规模个人办公自动化的有效手段（工具）。这是我的VBA应用程序的定义。在新的办公软件取代OFFICE到来之前，谁能在数据处理方面做到最好，谁就是王者。其中，终极技能非VBA莫属！记得20年前刚学VBA的时候，当时资料很少，只能看源码自己摸索，确实很难。二十年过去了。为了防止正在学习VBA的朋友重蹈我之前的经历，我根据自己多年使用VBA的实践经验，推出了八本VBA专题教程。学习顺序为七、一（或四）、三、二和六、五；其中七人和一（或四）人是初学者；三、二、八为中级，六、五为高级：

第一套：VBA代码解答，是对VBA中各个知识点的讲解。教程总共147篇，涵盖大部分VBA知识点。提供的程序文件是不可多得的代码宝库，适合初学者和中级人员；本系列教程当前版本为第二修订版，程序文件已通过32位和64位OFFICE系统的测试。

第二套：VBA数据库解决方案数据库是数据处理的专业工具教程详细介绍了使用ADO连接ACCDB和EXCEL的示例方法和操作，适合部分中级人员学习。本教程系列目前提供了教程的第一个修订版，程序文件已经在32位和64位OFFICE系统上通过了测试。

第三组：VBA数组和字典解决方案数组和字典是VBA的本质。字典是提高VBA代码水平的有效手段。它们值得深入研究，并且是初级和中级人员改进代码的一种手段。本系列教程当前版本为第一修订版，程序文件已在32位和64位OFFICE系统上通过测试。

第四套：VBA代码解答视频是专门针对初学者的视频讲解，可以帮助你快速上手，更快掌握这项技能。本教程系列是第一个教程系列（修订版）的视频讲解，视频更容易让人接受。

第五套：VBA中类的解释和使用这是一篇讲解类的虚无和实体程度的进阶教程，虽然类的使用很少，但仔细的学习可以促进你VBA理论的提高。了解本教程系列主要是让读者了解和理解一种佛教哲学。本系列教程当前版本为第一修订版，程序文件已在32位和64位OFFICE系统上通过测试。

教程系列之六：捕获和处理VBA信息这是一个范围更广、更方便的高级教程。它针对中级和高级人员。本教程总共涵盖二十个主题，包括：在应用程序之间捕获信息、使用随机信息、发送电子邮件、捕获VBAInternet数据、VBA延迟操作、应用剪贴板、拆分功能扩展、关于工作表等与应用程序交互、使用FSO对象，获取工作表和文件夹信息、获取图形信息、自定义工作表信息功能等。程序文件已通过32位和64位OFFICE系统测试。

第七套教程：VBA的EXCEL应用程序这是一个入门教程，共分三册，从创建宏、对话框、文件夹和工作表对象、单元格对象等基础知识开始，一直到循环结构。为了提高我们的EXCEL水平，向我们讲解了错误处理、字符串操作、日期时间、事件、数组应用、函数过程等。直到控件和表单对象的应用程序。

第八套教程：VBAWORD应用是专注于“面向对象编程”的讲解，让大家全面了解Word中的VBA对象，以及对象的属性、方法、用法。本教程分为三册，十六章。前十五章解释了各种物品属性和方法。每个部分都包含专门的示例来说明这些属性方法的具体应用，详细介绍了实际工作中的28个代表性示例，重点关注文字数据的批量处理并充分利用VBA的优势。本教程系列中有很多示例，您可以立即使用或修改以供自己使用。由于本系列教程的重点是“面向对象编程”，因此建议先学习“VBAExcel应用”，对VBA中的对象、属性、方法和事件有一定了解后再学习本系列教程。