利用Excel+Access+VBA自动汇总年度台账的具体操作步骤如下：

启动VBA编辑器。在“职工年度台账表”工作簿中选择“Sheet1”工作表标签，按下Alt+F11组合键，即可启动VBA编辑器，如图3-168所示。

添加引用库。在“VBA”编辑窗口中选择“工具”→“引用”菜单项，即可弹出“引用—VBAProject”对话框，在“可使用的引用”列表中勾选“Microsoft ActiveX Data Objects 2.7 Library”和“Microsoft ADO Ext 2.8 for DDl and Secturity”两个复选框，如图3-169所示。

图3-168 VBA编辑窗口

图3-169 “引用-VBAProject”对话框

编辑初始化代码。在VBA编辑器左侧“工程”界面中双击“ThisWorkbook”，弹出“ThisWorkbook”代码编写区，单击“通用”下拉列表框按钮，从命令列表中选择ThisWorkbook进行代码编辑，如图3-170所示。

在代码编辑区输入初始化代码，这段代码功能为“Sheet1”表组合框添加选项，并刷新“Sheet2”表A列字段名，添加代码完毕后的显示效果如图3-171所示。单击“常用”工具栏中的“保存”按钮保存输入的代码。

图3-170 ThisWorkbook代码编辑窗口

图3-171 输入初始化代码信息

编辑查看代码。在“VBA编辑器”左侧的“工程”界面中双击“Sheet1”，弹出“Sheet1”代码编写区，单击“通用”下拉列表框选择Worksheet进行代码编辑，如图3-172所示。

在代码编辑区输入查看代码，当用户从组合框中选择了项目后，即可刷新显示数据，如图3-173所示。单击“常用”工具栏中的“保存”按钮，即可保存输入的代码。

运行代码。在VBA编辑窗口中单击“常用”工具栏中的“运行子过程/用户窗体”按钮，即可运行查询代码程序。单击“ThisWorkbook（代码）”打开其窗口，单击“常用”工具栏中的“运行子过程/用户窗体”按钮，运行初始化代码程序，在VBA编辑器中还看到不到运行的结果，需要返回到工作表中才可看到。

图3-172 Worksheet代码编辑窗口

图3-173 输入查询代码信息(www.daowen.com)

在VBA编辑器窗口中的“常用”工具栏中单击“视图Microsoft Excel”按钮，即可返回到Excel工作界面。选择“Sheet1”工作表标签，在其中单击前面新添加组合框的下拉按钮，弹出员工号选项菜单，选中“A001”，即可在表格中显示该员工的相关信息，如图3-174所示。

单击工作表标签“Sheet2”，此时在“全部项目”栏下面显示出了相关的子项目，如图3-175所示。至此，年度职工工资台帐表就制作完成了。

图3-174 员工相关信息

图3-175 全部项目显示效果

为了美化表格，还需对该表格进行调整。具体操作步骤如下：

设置表格的边框。在“Sheet1”工作表中选中A2：Q19单元格区域，按下〈Ctrl+L〉组合键或从右键菜单中选择“设置单元格格式”选项，打开“设置单元格格式”对话框。在“边框”选项卡下依次单击“外边框”和“内部”按钮，再单击“确定”按钮，即可设置表格的边框，如图3-176所示。

合并单元格。在“Sheet1”工作表中选中A1：Q1单元格区域，选择“开始”主选项卡，在“对齐方式”工具栏中单击“”按钮，从弹出菜单中选择“合并单元格”选项，即可将A1：Q1单元格区域合并成一个单元格，再合并表格中其他单元格区域，如图3-177所示。

图3-176 调整表格的边框

图3-177 合并单元格

强制换行文字。在“Sheet1”工作表中单击P4单元格，将光标移动到“经手人”和“签字”之间，按下〈Alt+Enter〉组合键，此时“签字”就被强制换行了。再强制换行其他单元格中的文字，如图3-178所示。

调整文本对齐方式。在“Sheet1”工作表中选择A1：Q19单元格区域，选择“开始”选项卡，在“对齐方式”工具栏中单击“居中”按钮，即可将表格中文字居中显示，如图3-179所示。

图3-178 强制换行文字

图3-179 调整文本对齐方式