Excel 财务应用 创建表单中按钮程序和公式 在工作表中创建“档案管理”按钮的目的是为了让用户单击该按钮时,弹出档案管理窗体界面,便于用户进行添加、查询员工信息。而创建“退出系统”按钮,是为了保存工作簿文件并关闭工作簿。另外,在本节中还将介绍统计公司员工总人数的方法。 1.统计员工数量 为了随时掌握员工的数量,可以在“目前员工总数”所对应的单元格中,输入“=COUNTA(A8:A100)”公式,即可计算出员工总数,如图6-97所示。 输入 计算结果 图6-97 计算员工总数 COUNTA函数返回参数列表中非空值的单元格个数。利用函数COUNTA可以计算单元格区域或数组中包含数据的单元格个数。 语法:COUNTA(value1,value2,...) 其中,Value1, value2,...代表要计数其值的1到255个参数。 在公式“=COUNTA(A8:A100)”中,单元格区域为A8:A100区域,是为了统计当员工增加时的准确个数。若输入A8:A20单元格区域,当员工个数增加到了14个或更多时,将计算出错误的统计个数,所以应加大计算区域的范围。 2.设置控件按钮 右击“退出按钮”控件,执行【指定宏】命令,如图6-98所示。然后在弹出的【指定宏】对话框中,选择“员工基本档案管理.xlsx!退出系统”宏名,并单击【新建】按钮,弹出VB编辑窗口,在窗口输入“退出系统”代码,如图6-99所示。 右击 单击 输入 执行 选择 图6-98 执行【指定宏】命令 图6-99 输入“退出系统”代码 其代码如下: Sub 退出系统() ActiveWorkbook.Save '保存工作簿文件 ActiveWorkbook.Close '关闭工作簿文件 End Sub 运用相同的方法,右击“档案管理”控件,执行【指定宏】命令,在弹出的【指定宏】对话框中,选择“员工基本档案管理.xlsm!档案管理”宏名。然后,单击【新建】按钮,弹出VB编辑窗口,并在窗口输入“档案管理”代码,如图6-100所示。 输入 图6-100 输入“档案管理”代码 其代码如下: Sub 员工查询() Management.Show '单击按钮,则会弹出窗口Mangement End Sub 面才介绍,因此先创建弹出Mangement窗口的程序操作。 提 示 由于“档案管理”控件按钮的功能是调出档案管理窗体界面,而此窗体界面在后 本文来源:https://www.wddqw.com/doc/aee5be04767f5acfa0c7cd3b.html