按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！
534
…………………………………………………………Page 535……………………………………………………………
x = MsgBox（―把当日销售值拷贝到上日销售栏吗？
If x = vbYes Then
Range（―B5：B8‖）。Copy
Range（―C5‖）。Select
Selection。PasteSpecial Paste：=xlvalues
Application。CutCopyMode = False
End If
'将日期增加一天
x = MsgBox（―把日期增加一天吗？‖；vbYesNo）
If x = vbYes Then
Range（―C2‖）= Range（―C2‖）＋ 1
End If
'重新保护工作表
ActiveSheet。Protect
End Sub
将文件保存并关闭。重新打开此文件，体验一下 Auto_Open 宏是如何为你工作的吧。
如果你想用 Auto_Open 完成其它的操作而又不知道如何用 VBA 语句直接建立宏，Excel
的录制宏的功能可以帮助你，但是别忘了把所录制的宏取名为Auto_Open 。关于录制宏的方法
请参阅一般的 Excel 功能手册。
Office 中Enter 键的妙用
一、在 Excel 中的妙用
1。在单元格内换行
535
…………………………………………………………Page 536……………………………………………………………
使单元格处于编辑状态，按“Alt＋Enter‖组合键后键入相应的数据。
2。 同时在多个单元格中输入相同数据
选定需要输入数据的单元格，选定的单元格可以是相邻的，也可以是不相邻的。键入相应
数据，然后按“Ctrl＋Enter‖组合键。
3。编辑数组公式
在数组区域中单击任一单元格。单击编辑栏，当编辑栏被激活时，大括号（｛
｝）在数组公式中消失。编辑数组公式内容，然后按―Ctrl＋Shift＋Enter‖组合键。
二、在 Word 中的妙用
1。插入分页符
单击要出现在下一页上的行，按 Ctrl＋Enter‖组合键。
2。分割表格
单击需要分割的位置，按“Ctrl＋Shift＋Enter‖组合键
Office 中常见问题的解决
一、Excel 的―计算出错‖
某厂在计算员工的加班工资时（如图 1），突然发现发出的总加班工资与― 自动求和‖计算的
结果有出入，为此认定― 电脑计算‖会出错，从而出现― 电脑计算‖不如―手工计算‖可靠的尴尬局
面。
以上问题主要产生的原因是虽然单元格内加班工资显示是整数，但在求和的计算中整数下
的小数点也参与了计算，这样计算结果与实际整数相加难免就会有出入。这时我们只要应用
Excel 中四舍五入函数―ROUND‖，一切问题就会迎刃而解。
二、Word2000 中奇数行单元格合并后再―一分为二‖
536
…………………………………………………………Page 537……………………………………………………………
假如你需制作如（ 图2）格式的表格，也许在拆分大单元格时你会遇上―麻烦‖，如果你用工
具上的―拆分单元格‖命令随即你就发现―此路不通‖，如果你用工具栏的―铅笔‖画你马上会发现
中间行自动增大。但如果按以下步骤操作便可解决此问题：选定表格→表格→表格属性→行，
在―指定高度‖ 的复选框上打钩、在―行高值是‖ 的下拉框内选定― 固定值‖确定后，再用―铅笔‖画
即可解决。
三、任务栏上不见―输入法指示器‖或―输入法缺省 En‖
如果你遇到前一个问题，只需按如下步骤即可调出：点“开始”选“设置”，单击“控制
面板”，双击“输入法”，在“启动任务栏上的指示器”的复选框上打钩即可。如果你遇到后一
个问题，就需按如下步骤操作：点“开始→设置→控制面板→键盘→语言→英语”即可。
四、Excel 中输入以―0‖开头的数字或数字的幂次方
也许你需要经常输入以“0‖开头的数字（如 0012），但是当你按回车后前面的―0‖就不见了，
另外在 Excel 输入数字的幂次方（如图）也无法显示出来。这时只要先选定单元格后点―格式‖，
单击―单元格‖选定―数字
‖项，在―分类‖框内选―文本‖，确定后再输入以上内容即可。
五、Word 中图形框（或文本框） 内的文本居中难
在 Word 实际操作中你可能会遇到如下情况：图形框内文本离上边线和左边线尚有一些空
间而文本的下部或右部却未能完全显示出来，有时你费尽心机让图形框内文本居中却难尽如人
意。其中原由都是― 内部边距‖惹的祸。为此，我们须双击― 图形框‖，弹出―设置图形格式‖对话
框，选定―文本框‖选项，根据情况修改左、右、上、下的数值即可。另外，表格列宽很小也会
遭遇居中难问题，原因与解决方法与上雷同，只是其边距须在―表格属性‖ 的―选项‖ 内修改。
Word 与 Excel 联手制作工资审批表
机关事业单位工作的财务人员，经常要填写《国家机关事业单位工作人员工资变动审批表》
537
…………………………………………………………Page 538……………………………………………………………
图 1。工作量少时，一两人的工资变动，多时几十、几百人的工资变动都要填写，且重复、易
错。我们只要利用 Excel 强大的数据管理功能和 Word 的邮件合并功能就能轻松制作审批表。
第一步：先建立一个 Word 文件《国家机关事业单位工作人员工资变动审批表》（ 以下简称
《工资审批表》） ，格式为图 1 所示需上报的审批表。
第二步：建立一个 Excel 文件《工资变动情况表》，将《工资审批表》内需填写的项目作
为表格第一行列标题。为下一步方便，列标题尽可能使用简短的名称（如―不算工龄学习年限‖
可简称―学习年限‖，使用批注功能注明其全称） 。从第二行起录入工资变动人员的数据，保存
并关闭文件图 2 。
第三步：打开 Word 文件《工资审批表》，在工具栏右键单击选择―邮件合并‖，调出邮件合
并工具栏（将鼠标在按钮上停留三秒后会出现按钮名称） ，如图 3 所示。
点击邮件合并工具栏“设置文档类型”按钮，设置主文档类型为“信函”，点“确定”。再
点击“打开数据源”按钮，在“选取数据源”对话框中找到刚编辑的 Excel 文件《工资变动情
况表》，打开―选择表格‖对话框。点选相应的表格及选中―数据首行包含列标题（F）‖，单击―确定‖
图4 。
第四步：移动光标到姓名后的空格，点击邮件合并工具栏“插入域”按钮，在“插入合并
域”对话框中依次点击“数据库域”→“姓名”→“插入”→“关闭”，空格中显示“姓名”，
即完成第一个空格的合并域工作。依次将移动光标到其他空格，插入域。
第五步：根据文件格式要求及上述―插入域‖ 的方法编辑―呈报单位或主管部门意见‖ 。其中，
书名号及其中的内容是插入域的内容，不能直接输入图 5 。
检查以上操作、内容均无误后，进入下一步（点击―检查错误‖按钮，进行错误检查，即可完
成相应工作） 。
第六步：点击“查看合并数据”按钮，即可显示第一条记录。点击“首记录”、“上一记录”、
538
…………………………………………………………Page 539……………………………………………………………
“下一记录”、“尾记录”或在输入框中输入数字可进行相应记录的查询。
第七步：点击―合并到新文档‖或―合并到打印机‖，即可完成全部工资审批表的编辑工作或
打印工作。
需要注意的问题：如果改动《工资变动情况表》列标题内容，就必须相应更改《工资审批
表》“插入域”的内容，否则会出错。如果移动了《工资审批表》和《工资变动情况表》的保
存位置，在打开《工资审批表》时要重新指定“数据源”的位置。
对《巧用 Excel 函数分辨人员身份》一文的补充
2002 年第 38 期所刊《巧用 Excel 函数分辨人员身份》一文，提出了让计算机自动填写表
格内容的方法，减轻了工作负担。笔者还对该文提出以下几点补充，并推荐使用 YEAR（） 、
TODAY（）、NOW（） 、LEN（）和 MID（） 函数。
一、计算―年龄‖时，因为 18 位身份证号码也比较多，而且身份证号的最后一位字符有可
能为 X ，所以身份证号应为字符型数据。
计算年龄时，若采用上期所讲的，利用常数 102 作被减数，那么每年都要修改操作代码。
最好先用 YEAR（TODAY（））或 YEAR（NOW（））取出当前年号，然后减去身份证号中取出的年号
来求年龄。身份证的字长可用 LEN（）测出。设表格单元格 C2 为身份证号，则年龄可由下式计
算：
年龄=YEAR（TODAY（））…IF（LEN（C2）=18；MID（C2；7；4） ，MID（C2；7；2）＋1900） ，
或：
年龄=YEAR（NOW（））