按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！
有的空行都已被删去，再单击―数据‖菜单，选取―筛选‖项中的― 自动筛选‖命令，工作表中的数
据就全恢复了。插入一个空行是为了避免删除第一行数据。 如果想只删除某一列中的空白单
元格，而其它列的数据和空白单元格都不受影响，可以先复制 此列，把它粘贴到空白工作表
上，按上面的方法将空行全部删掉，然后再将此列复制，粘贴到原工作表的相应位置上。 6、
如何避免错误信息 在Excel中输入公式后，有时不能正确地计算出结果，并在单元格内显示一
个错误信息，这些错误的产生，有的是因公式本身产生的，有的不是。下面就介绍一下几种常
见的错误信息，并提出避免出错的办法。 １）错误值：＃＃＃＃ 含义：输入到单元格中的数
据太长或单元格公式所产生的结果太大，使结果在单元格中显示不下。或是日期和时间格式的
单元格做减法，出现了负值。 解决办法：增加列的宽度，使结果能够完全显示。如果是由日
期或时间相减产生了负值引起的，可以改变单元格的格式，比如改为文本格式，结果为负的时
间量。 ２）错误值：＃DIV/0！ 含义：试图除以0。这个错误的产生通常有下面几种情况：除
数为0、在公式中除数使用了空单元格或是包含零值单元格的单元格引用。 解决办法：修改单
元格引用，或者在用作除数的单元格中输入不为零的值。
XVII
…………………………………………………………Page 18……………………………………………………………
Excel_word_ppt_使用技巧大全（完全版）
３）错误值：＃VALUE！ 含义：输入引用文本项的数学公式。如果使用了不正确的参数或运算
符，或者当执行自动更正公式功能时不能更正公式，都将产生错误信息＃VALUE！。 解决办法：
这时应确认公式或函数所需的运算符或参数正确，并且公式引用的单元格中包含有效的数值。
例如，单元格C4中有一个数字或逻辑值，而单元格D4包含文本，则在计算公式=C4＋D4时，系
统不能将文本转换为正确的数据类型，因而返回错误值＃VALUE！。 ４）错误值：＃REF！ 含义：
删除了被公式引用的单元格范围。 解决办法：恢复被引用的单元格范围，或是重新设定引用
范围。 ５）错误值：＃N/A 含义：无信息可用于所要执行的计算。在建立模型时，用户可以
在单元格中输入#N/A，以表明正在等待数据。任何引用含有#N/A值的单元格都将返回#N/A。 解
决办法：在等待数据的单元格内填充上数据。 ６）错误值：＃NAME？ 含义：在公式中使用了
Excel所不能识别的文本，比如可能是输错了名称，或是输入了一个已删除的名称，如果没有
将文字串括在双引号中，也会产生此错误值 解决办法：如果是使用了不存在的名称而产生这
类错误，应确认使用的名称确实存在；如果是名称，函数名拼写错误应就改正过来；将文字串
括在双引号中；确认公式中使用的所有区域引用都使用了冒号（：）。例如：SUM （C1：C10）。
注意将公式中的文本括在双引号中。 ７）错误值：＃NUM！ 含义：提供了无效的参数给工作表
函数，或是公式的结果太大或太小而无法在工作表中表示。 解决办法：确认函数中使用的参
数类型正确。如果是公式结果太大或太小，就要修改公式，使其结果在…1×10307和1×10307
之间。 ８）错误值：＃NULL ！ 含义：在公式中的两个范围之间插入一个空格以表示交叉点，
但这两个范围没有公共单元格。比如输入：―=SUM（A1：A10 C1：C10）‖，就会产生这种情况。
解决办法： 取消两个范围之间的空格。上式可改为―=SUM（A1：A10 ；C1：C10）‖
XVIII
…………………………………………………………Page 19……………………………………………………………
Excel_word_ppt_使用技巧大全（完全版）
Part 2： EXCEL 自学资料第一集
返回首页
自学资料第一集 1、Application。mandBars（〃Worksheet Menu Bar〃）。Enabled = false 2、
cells（activecell。row；〃b〃）。value ' 活动单元格所在行 B 列单元格中的值 3 、Sub
CheckSheet（）'如果当前工作薄中没有名为kk的工作表的话，就增加一张名为kk的工作表，并
将其排在工作表从左至右顺序排列的最左边的位置，即排在第一的位置 Dim shtSheet As
Worksheet For Each shtSheet In Sheets If shtSheet。Name = 〃KK〃 Then Exit Sub Next
shtSheet Set shtSheet = Sheets。Add（Before：=Sheets（1）） shtSheet。Name = 〃KK〃 End Sub
4、Sheet1。ListBox1。List = Array（〃一月〃； 〃二月〃； 〃三月〃； 〃四月〃）'一次性增加项目 5、
Sheet2。Rows（1）。Value = Sheet1。Rows（1）。Value'将一个表中的一行全部拷贝到另一个表中
6 、Sub pro_cell（）' 将此代码放入 sheet1；则me=sheet1； 主要是认识me Me。Unprotect
Cells。Locked = False Range（〃D11：E11〃）。Locked = True Me。Protect End Sub 7 、
Application。mandBars（〃Ply〃）。Enabled = False'工作表标签上快捷菜单失效 8、Sub
aa（）'把B1到B12单元格的数据填入c1到c12 For i = 1 To 12 Range（〃C〃 & i） = Range（〃B〃 &
i） Next i End Sub 9、ActiveCell。Addment Selection。Font。Size = 12'在点选的单元格
插入批注，字体为12号 10、Private Sub Worksheet_BeforeDoubleClick（ByVal Target As
Range； Cancel As Boolean） Cancel = True End Sub 11、ScrollArea 属性 参阅应用于示例
特性以 A1 样式的区域引用形式返回或设置允许滚动的区域。用户不能选定滚动区域之外的单
元格。String 类型，可读写。 说明 可将本属性设置为空字符串 （〃〃） 以允许对整张工作表
内 所 有 单 元 格 的 选 定 。 示 例 本 示 例 设 置 第 一 张 工 作 表 的 滚 动 区 域 。
Worksheets（1）。ScrollArea = 〃a1：f10〃
XIX
…………………………………………………………Page 20……………………………………………………………
Excel_word_ppt_使用技巧大全（完全版）
12if application。max（＇a1：e1＇）=10 then msgbox〃〃 mandbutton1。enabled=false
'A1—E1最大的数值达到10时，自动弹出对话框，并冻结按钮 12、本示例将更改的单元格的颜
色 设 为 蓝 色 。 Private Sub Worksheet_Change（ByVal Target as Range）
Target。Font。ColorIndex = 5 End Sub 13、Sub test（）'求和 Dim rng As Range； rng2 As Range
For Each rng In ActiveSheet。UsedRange。Columns Set rng2 = Range（Cells（1； rng。Column）；
Cells（Cells（65536； rng。Column）。End（xlUp）。Row； rng。Column））
rng2。Cells（rng2。Cells。Count）。Offset（1； 0） = WorksheetFunction。Sum（rng2） Next rng End
Sub 14、将工作薄中的全部n张工作表都在sheet1中建上链接 Sub test2（） Dim Pt As Range Dim
i As Integer With Sheet1 Set Pt = 。Range（〃a1〃） For i = 2 To
ThisWorkbook。Worksheets。Count 。Hyperlinks。Add Anchor：=Pt； Address：=〃〃；
SubAddress：=Worksheets（i）。Name & 〃！A1〃 Set Pt = Pt。Offset（1； 0） Next i End With End
Sub 15 、保存所有打开的工作簿，然后退出 Microsoft Excel 。 For Each w In
Application。Workbooks w。Save Next w Application。Quit 16、让form标题栏上的关闭按钮
失效 Private Sub UserForm_QueryClose（Cancel As Integer； CloseMode As Int