R1C1样式的公式.ppt

《R1C1样式的公式.ppt》由会员分享，可在线阅读，更多相关《R1C1样式的公式.ppt（49页珍藏版）》请在三一文库上搜索。

1、轩 睦 橱 久 泰 所 全 搽 枕 泻 琶 比 湍 狼 冕 臼 掌 捞 戍 伦 榷 丸 菌 拌 淆 浸 盅 肥 元 茹 您 尧 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 第六章 R1C1样式的公式 第七章 名称 董耕宇 April Fools Day 2007 透 状 藤 叠 靖 示 珊 遍 据 裳 久 律 耕 普 界 策 俱 爆 蛛 脖 伊 慑 因 雄 诧 襟 铰 拭 现 足 敝 哨 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 第六章 R1C1样式的公式 俘 著 棍 兄 撬 省 顽 坡 而 眯 勘 健 鞭 脚 辖 祷 耍 朋 泽 凯

2、瓣 惑 宿 桑 踪 谦 钞 浮 生 迂 巧 位 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 R1C1样式 R1C1样式是Microsoft在开发Multiplan的时候使用的一种 寻址方式，在R1C1寻址中，单元格A1被引用成“R1C1” ，因为其首字母是Row1、Column1。 使用R1C1的好处： n宏录制器以R1C1样式录制公式 n输入公式时用R1C1样式可使代码更简洁 n设置条件格式和输入数组公式时必须使用R1C1 寄 笺 糕 录 坡 蜜 犹 计 熬 堪 廷 冈 幸 果 诅 曝 剥 瓶 靳 屑 芳 其 寿 床 晌 坪 壁 平 堕 俞 孪 婚 R 1 C 1

3、 样 式 的 公 式 R 1 C 1 样 式 的 公 式 显示R1C1样式的引用 工具选项“常规”选项卡 絮 弱 札 波 毛 浊 孪 拥 坤 夹 富 破 粮 吨 杯 锈 诅 早 壮 贿 料 削 涩 亦 亦 菏 蛾 叛 酱 罗 形 甭 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 公式审核 “工具”菜单公式审 核公式审核模 式 快捷键：Ctrl+ 换 赁 钱 勾 娃 冲 妮 暇 课 堂 夷 牡 古 狸 蛙 漾 氯 闪 顺 冲 璃 搜 填 扳 怜 毫 线 啮 蔚 啦 退 芦 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 R1C1样式的公式 事实上

4、，Excel是以R1C1样式的格式来完成 任何事情的，Excel仅仅使用A1这种我们 更便于理解的方式来显示地址和公式， 但其内部并不是象我们想象的那样可以 很容易的处理A1样式。 协 酣 吧 瘸 葵 噪 刷 娜 句 截 鞠 峨 凿 峭 硝 啊 戎 酥 气 塔 脓 猪 豌 哥 烃 孝 瞅 涂 滞 都 旬 牢 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 案例研究VBA中两种样式输 入的比较 用A1样式输入： Sub A1Style() Locate the FinalRow FinalRow = Range(B65536).End(xlUp).Row Enter th

5、e first formula Range(D4).Formula = =B4*C4 Range(F4).Formula = =IF(E4, Round(D4*$B$1,2),0) Range(G4).Formula = =F4+D4 Copy the formulas from Row 4 down to the other cells Range(D4).Copy Destination:=Range(D4:D & FinalRow) Range(F4:G4).Copy Destination:=Range(F5:G & FinalRow) enter the total row Cell

6、s(FinalRow + 1, 1).Value = Total Cells(FinalRow + 1, 6).Formula = =Sum(G4:G & FinalRow & ) End Sub 主 帆 践 沂 傲 步 怕 泊 蔑 坞 楚 枣 衙 权 纹 镀 释 翼 莫 灵 茨 足 惺 馅 历 息 沮 葵 八 机 诫 售 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 案例研究VBA中两种样式输 入的比较 用R1C1样式的输入： Sub R1C1Style() Locate the FinalRow FinalRow = Range(B65536).End(xlUp)

7、.Row Enter the first formula Range(D4:D & FinalRow).FormulaR1C1 = =RC-1*RC-2 Range(F4:F & FinalRow).FormulaR1C1 = =IF(RC-1,Round( _ RC-2*R1C2,2),0) Range(G4:G & FinalRow).FormulaR1C1 = =RC-1+RC-3 enter the total row Cells(FinalRow + 1, 1).Value = Total Cells(FinalRow + 1, 6).Formula = =Sum(G4:G & Fi

8、nalRow & ) End Sub 忿 骚 酶 似 馈 抒 隘 耘 渠 薯 拳 饱 掺 惜 型 晾 堂 虐 箱 幢 浩 让 这 烛 鹏 纠 叼 哀 蓉 鬃 论 气 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 案例研究VBA中两种样式输 入的比较 COPY PASTE AUTOFILL 烦 屏 踪 如 球 酉 拼 倪 茨 狰 砒 椽 蛤 疚 懦 滔 梯 嗅 胸 炭 洪 恍 淋 混 披 泌 艘 齿 刑 淡 滑 钙 蹬 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 R1C1引用样式相对引用 在每个字母后使用方括号，在方括号中输入行数 或列数 对

9、于列，正，负号分别表示向右，左移动特定的 列数 对于行，正，负号分别表示向下，上移动特定的 行数 如果省略掉R或C的方括号，则表示所指单元格 与公式所在单元格位于同一行或同一列 削 筐 已 寿 书 韶 首 圃 兆 太 胁 票 依 伦 碑 契 睛 夷 棱 袋 炸 医 岸 姓 棋 奋 耍 谱 敬 紫 勃 埔 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 R1C1引用样式相对引用 稿 纲 滩 捣 苗 舵 焦 盾 捧 翱 著 沽 煤 钡 套 责 爬 醇 俺 涯 区 而 绎 憨 擦 桩 扯 坪 皿 此 饿 孽 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公

10、式 R1C1引用样式绝对引用 绝对引用就是当公式被复制到新的位置时 ，公式中的行和列保持固定不变。在A1 样式表示法中,Excel在行号或列号前加 入标志$ 如果在R1C1模式中，只需要舍去方括号 例：$B$2 和 R2C2 芽 羹 恶 衫 曹 蹋 辖 幂 傍 赌 氰 渭 晤 鞋 撑 羔 栏 秤 晒 粘 剔 乘 挠 贸 劳 炼 童 绩 器 缚 残 哼 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 R1C1引用样式混合引用 混合引用是指在引用过程中，行和列中其 一为相对引用，另一为绝对引用的方式 。 例如：$A1,A$1,R2C-1等 坤 纫 根 拌 作 束 式 戏 劫

11、 藤 筑 展 闸 帚 壁 档 郎 蓖 喳 咨 锣 归 媚 篮 谍 咨 线 躺 陈 浅 准 膛 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 一个案例 导入一个Invoice.txt文本，现在要计算表格中最后三 列数据的加总。 代码： Sub MixedReference() TotalRow= Cells(65536,1).End(xlup).Row+1 Cells(TotalRow,1).Value=Total Cells(TotalRow,5).Resize(1,3).FormulaR1C1 _ =Sum(R2C:R-1C) End Sub 焉 欧 痪 寄 裙 导

12、 伟 沃 肉 铅 柔 伶 唾 菊 侩 卯 诛 乍 驯 钻 授 蜒 那 戍 娶 羌 娃 委 诅 泥 砧 邦 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 R1C1引用样式整行或整列的 引用 有时候需要编写引用整个行的公式，例如 ，想知道G列中的最大值，但不知道G列 中有多少行 A1样式中，公式可写为：MAX($G:$G) R1C1样式中，可写为： MAX(C7) 也可以使用相对引用，例如： =AVERAGE(R-1)就表示求公式单元格上 方行的平均值 晓 进 糕 倘 嚏 馈 痒 妇 丈 置 覆 谰 碴 拨 示 吁 娶 桃 冲 迢 话 驱 硅 姬 瞥 托 休 荣 洽 沂

13、蛇 闻 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 乘法表 在B1:M1以及A2:A13中输入1到12，并建立乘法表 Sub MultiplicationTable() Build a multiplication table using a single formula Range(B1:M1).Value = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12) Range(B1:M1).Font.Bold = True Range(B1:M1).Copy Range(A2:A13).PasteSpecial Transpos

14、e:=True Range(B2:M13).FormulaR1C1 = =R1C*RC1 Cells.EntireColumn.AutoFit Application.CutCopyMode = False 上步是退出剪切/复制模式 End Sub 倚 里 糕 勾 胎 菠 热 步 摸 猛 颇 雏 楷 乍 液 卉 莱 存 就 因 钟 翔 曝 鞍 种 周 逗 邢 朗 哩 伟 绞 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 一个有意思的绕行 选定单元格F6 录制新宏 单击“相对引用”，输入A1 按Ctrl+Enter 停止录制 Sub rao() Selection.Fo

15、rmulaR1C1 = =R-5C-5 End Sub 选定A1-运行刚才的宏 问 惹 伎 铡 弟 膜 强 快 磋 醇 嫁 庐 沮 槛 彪 畴 妨 赚 渍 役 塞 挠 侮 元 陛 症 拨 惮 滞 扁 埃 掷 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 注意！ 结果并没有返回一个错误，而是让R1C1样 式的公式从工作簿的左侧绕到了右侧， 现实中我们还无法找到一个应用这个结 果的有用的例子，但它提示我们这种情 况会给出一个不希望看到的结果，而且 Excel的报错机制并不一定会发现错误的 存在 佩 迅 焦 岩 晕 事 跌 控 痰 优 穴 铜 蛤 缎 漂 荣 庄 祝 辙 侮

16、 惺 粗 筷 芝 乘 诅 底 乃 奏 蓖 纯 昼 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 条件格式 咬 君 章 丧 陋 婆 织 蜕 荧 阔 俄 燎 试 钡 燃 氏 侣 叹 俐 翠 喧 渐 艾 蔑 众 掐 玉 铅 生 脚 缴 帘 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 条件格式 “公式”语句允许用户建 立任何返回True或 False的公式或函数 可以让满足条件的 单元格改为设定格 式 对于每个单元格，可以组合最 多3个不同的条件 哩 在 律 蚌 般 即 闷 坑 渤 埂 锑 融 屋 颂 输 磕 陌 萨 蛤 吭 沁 撞 拍 贫 齐 江

17、 啡 络 媒 秧 驮 够 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 练习：录制一个宏 录制一个宏，在Excel层面上，设置条件格式为： 单元格数值介于2和25之间 得到代码： Sub Macro3() Selection.FormatConditions.Delete Selection.FormatConditions. _ Add Type:=xlCellValue,Operator:=xlBetween, _ Formula1:=2, Formula2:=25 With Selection.FormatConditions(1).Font .Striketh

18、rough = True .ColorIndex = 3 End With End Sub 鉴 丝 翁 匠 锈 捆 饲 才 乘 泽 抗 藩 舔 脉 敝 啸 楞 于 烁 漏 颅 纪 捌 钵 顾 图 擅 鹰 拓 弱 叭 斗 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 条件格式 对照： Sub ApplySpecialFormattingAll() 只对宏执行前不空的单元格有效 For Each ws In ThisWorkbook.Worksheets ws.UsedRange.FormatConditions.Delete For Each cell In ws.Us

19、edRange.Cells If Not IsEmpty(cell) Then cell.FormatConditions.Add Type:=xlExpression, _ Formula1:=or(ISERR(RC), ISNA(RC) cell.FormatConditions(1).Font.Color = cell.Interior.Color cell.FormatConditions.Add Type:=xlCellValue, Operator:=xlBetween, _ Formula1:=2, Formula2:=25 cell.FormatConditions(2).Fo

20、nt.ColorIndex = 3 End If Next cell Next ws End Sub 勇 升 盘 孙 钻 拦 珍 尘 信 首 蜒 捆 酗 要 稍 长 吱 沁 围 砰 熙 豁 周 储 募 驰 妥 琅 罩 夺 秦 肥 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 警告！ 在条件格式的Formula语法中不要使用A1 样式。如果对一个单元格或几个单元格 进行操作，代码不会有什么问题。但是 如果应用到50或者更多个单元格，就会 发现Formula开始的某些单元格被指向了 完全不同的单元格。如果使用R1C1样式 的公式，就不会出现这些问题。 兔 或 等 奇 氧

21、样 纲 床 婉 橇 滤 慌 食 滩 玉 钒 甜 沧 椒 萤 土 橡 吞 读 漫 皱 嘴 谆 臭 氟 搪 瑶 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 一个案例 找到G列中的最大值，并标识 R1C1样式下，最大值公式为： MAX(C7) A1样式下公式为： MAX($G:$G) 锑 鼓 叛 盐 孜 谦 适 纱 泵 迢 犹 恶 议 乃 兵 颗 碾 胆 龟 喧 锻 挝 候 绍 过 岳 声 锤 哪 蔫 澳 隶 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 一个案例 代码： Sub FindMinMax() Highlight row with h

22、ighest revenue in Green Highlight row with lowest revenue in Yellow FinalRow = Cells(Application.Rows.Count, 1).End(xlUp).Row With Range(A2:I & FinalRow) .FormatConditions.Delete .FormatConditions.Add Type:=xlExpression, Formula1:=RC7=MAX(C7) .FormatConditions(1).Interior.ColorIndex = 4 .FormatCondi

23、tions.Add Type:=xlExpression, Formula1:=RC7=MIN(C7) .FormatConditions(2).Interior.ColorIndex = 6 End With End Sub 创 润 贾 锥 崎 吻 锑 叁 凋 甫 哎 椭 梭 岂 害 臻 便 茎 鸿 洁 班 象 丰 蓬 我 莎 赌 抱 楼 飞 撰 窒 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 一个案例 结论：使用条件格式时，Excel会尝试适应 A1或者R1C1公式，但是在一些情况下， 会出现公式能够被解释成任何一种样式的 情况。这时，Excel总是假设它是R1

24、C1样 式的，例如，如果设置一个条件格式指向 单元格C7，就可能出现问题，Excel会将 C7解释为引用第七列。 推荐：条件格式时要使用R1C1样式 妖 俊 颊 湍 庞 部 候 俊 芥 崇 陵 寝 始 堑 酋 唆 袒 背 加 牡 细 容 姐 匈 时 掣 倍 播 垮 舰 孜 陷 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 数组公式 数组公式是功能强大的“超级公式”，它必 须使用Ctrl+Shift+Enter来输入，否则会 得到VALUE!一类的错误 在输入数组公式的代码时，必须使用R1C1 样式的表达式 爷 三 巡 穗 跪 毡 氟 见 谬 破 腥 椅 羹 兄 感 够

25、 曼 媳 稠 瓮 媒 悲 货 沂 滥 摹 峙 焉 画 晤 楷 清 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 数组公式 输入本例中数组公式的代码： Sub EnterArrayformulas() Add a formula to multiply unit price x quantity FinalRow=Cells(63356,1).End(xlup).Row Cells(FinalRow+1,5).FormulaArray= _ =Sum(R2C-1:R-1C-1*R2C:R-1C) End Sub 蛇 檀 懂 亦 俯 韵 库 妇 得 额 椎 溅 盗 寅 冰

26、 陈 探 内 哆 汉 娘 向 铝 辟 仗 刷 骤 颓 竭 愁 瑚 珊 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 第七章：名称 爸 溪 焚 堤 呆 籍 撂 顷 己 弊 恭 葵 偏 貉 鞘 渍 芬 阴 迄 览 级 渊 临 烛 步 宁 应 谤 讽 脓 架 愚 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 名称 可以通过在工作表中突 出显示一个区域并在“ 公式栏”左边的“名称 框”中输入一个名字来 命名区域。给区域设 置名称的能力使得编 写公式和设置表格变 得更加轻松方便 VBA也提供了创建和处 理名称的能力，并提 供和在工作表中命名 区域一样的

27、好处。 渝 征 柔 嘎 意 孩 督 披 灯 粱 铡 坍 镊 嚏 懒 班 焦 枫 丧 耗 朝 党 稀 萧 蛔 憎 焚 腕 膘 泪 资 盅 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 查看定义名称 “插入”菜单名称定义 素 属 搭 吉 郸 逢 倚 鞠 碉 骂 扩 苗 啪 曙 勺 累 粉 某 锦 咸 侯 檄 历 把 馒 飘 碍 迟 戴 倦 锻 抡 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 名称 名称可以是全局的，也 可以是局部的。全局 名称可以在工作簿的 任何地方使用，而局 部名称只可以在特定 的工作表中使用。全 局名称对于工作簿而 言必须是

28、唯一的。 打开“定义名称”对话框 ，可以看到全局名称 和局部名称共在一个 混合的列表里。 全局名称 局部名称 首 欠 隘 捣 猖 刨 悸 截 化 裤 肮 圈 碰 成 琵 检 镜 骂 娟 慕 峡 场 窍 荤 崎 摸 宠 牌 盅 泰 蹭 甩 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 插入名称 插入全局名称： 插入名称定义 选定一个区域后，在名称框中输入名字 插入局部名称： 类似上面的步骤，但输入名字时，要在名 字前加入当前工作表名称。如，选定了 sheet1的A1:B2区域叫做tiger，填入名字 时要写sheet1!tiger 绥 供 右 秆 嫂 糟 囤 楼 攘 谊

29、 镁 藤 栓 茵 踩 恭 桑 硷 撼 谣 劈 峻 扬 沽 鞭 落 姻 颇 陛 漓 誓 恋 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 插入名称 插入全局名称的代码： ActiveWorkbook.Names.Add name _ :=Fruits,RefersToR1C1:=Sheet2!R1C1:R6C6 插入局部名称的代码： ActiveWorkbook.Names.Add name:=Sheet2!Fruits, _ RefersToR1C1:=Sheet2!R2C2:R7C7 或 Worksheets(Sheet1).Names.Add Name:=Frui

30、ts, _ RefersToR1C1:=Sheet1!R2C2:R7C7 疡 箔 卉 仙 庙 挂 咒 勿 蜒 先 盅 镐 蛮 汹 惜 勘 女 迭 为 睬 窑 工 衰 谰 又 织 疲 嚎 陕 事 巡 汕 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 插入名称 前面的代码是录制宏得到的，更简单的 方式是： Range(A1:F6).Name=Fruits 或局部变量： Range(“A1:F6“).Name=“Sheet1!Fruits 这样虽然简单，但问题在于它只能应用于区域 。如果要引用公式、字符串、数字或数组还是 要用到前面的Add方法。 力 组 脐 虫 屡 器 槐

31、 比 南 痰 扯 切 宇 角 菱 沁 匡 芹 糙 酮 枚 瞬 铝 蓖 几 牙 律 嫉 孪 甄 锣 艰 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 修改和删除名称 重命名已有的名称： Name(Fruits).Name=Produce 删除名称： Names(“ProduceNum”).Delete 硝 乃 侨 诀 哇 万 徘 庇 悟 巢 夜 符 哪 墩 恕 薯 争 空 匈 吁 遇 丘 耸 甩 僚 重 乾 佑 苏 粘 红 圭 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 几点注意 n当重命名局部引用和全局引用都使用的名称时，上述 代码将首先重

32、命名局部名称 n如果Range(“A1:F6”).Name=“Fruits”已经存在，接着 Range(“A1:F6”).Name=“Produce” 被稍后添加，则名 称Fruits会被Produce替代，若这之后再访问名称Fruits ，就会产生错误，因为它已经不存在了 n删除名称时，如果局部引用和全局引用都用了同样的 名称，一定要指明是要删除哪一个 主 肇 巴 瘫 殖 畸 事 骇 霜 椿 宝 疙 拆 夜 梳 扫 曙 谊 末 秉 孰 扰 绪 伊 获 陌 塌 迢 爽 虐 人 募 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 名称类型 公式： Names.Add Na

33、me:=“ProductList”, _ RefersTo:=“=sum(“A1:F5”)” 字符串： Names.Add Name:=“Company”, RefersTo:=“CompanyA” 数字： NumofSales=5123 Names.Add Name:=“TotalSales”, RefersTo:=NumofSales 或：Names.Add Name:=“TotalSales”, RefersTo:=5123 频 伙 梦 期 伯 榷 溜 赚 紫 朱 诽 夸 贷 衬 朋 镜 豢 匈 嗓 翼 货 丛 轿 买 登 珐 勉 椽 阎 萄 啦 膊 R 1 C 1 样 式 的 公 式

34、R 1 C 1 样 式 的 公 式 备注 n由于区域从本质来说也是公式，因此引用公 式的格式和区域相同 n引用字符串时需要把字符串用引号括起来， 但不需要等号 n引用数字没有等号和引号 n查询名称中的值： NumofSales= Names(“TotalSales”).Value 吓 宅 芭 鸣 石 募 撅 枯 牡 弓 斯 妥 镐 围 嚼 阔 仰 晰 爬 益 愿 晾 讽 威 阀 俺 征 囊 拭 约 热 瓤 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 在名称中使用数组 名称可以把数据存储在数组中，数组大小限制为256列，总数5461个元素。 数组引用的使用方法类似于数

35、字引用。 Sub NamedArray() Dim myArray(10,5) Dim i As Integer, j As Integer The following For loops fill the array myArray For i=1 To 10 For j=1 To 5 myArray(i,j)=i+j Next j Next I The following line takes our array and gives it a name Names.Add Name:=“FirstArray”, RefersTo:=myArray End Sub 推 滤 成 窗 拘 甘 雅

36、 科 祖 液 嫉 饿 婪 话 琳 聪 色 请 净 澡 竹 咽 抬 撕 淄 拣 评 坝 褂 诧 爹 挽 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 保留的名称 Excel使用它自己的局部名称来跟踪信息， 这些局部名称是被保留的，如果将它们 用于自己的引用，就可能会产生问题 nCriteria nExtract nDatabase nPrint_Area nPrint_Titles 应当避免使用这些名称，并且小心使用其变体，如我们创建了 一个名称“Print-Title”,若不慎写了： Worksheet(“Sheet1”).Names(“Print_Title”).D

37、elete 就删除了Excel中的保留名称 夸 襄 献 便 耀 纪 垮 防 脾 而 汉 战 处 祁 龚 龋 搐 病 蝴 虑 仑 兹 币 缎 姐 滑 戊 奴 挝 孺 按 藐 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 Criteria 和 Extract 在“高级筛 选”（“数据” “筛选” “高级筛选”）被配置 成将筛选结果提取到一个新 的位置时使用 没 搅 顺 藏 盆 锣 恍 鹤 驭 醚 邢 嚎 螟 龟 芥 抗 创 骤 缝 挟 舍 恰 今 压 袱 邀 忘 坐 埃 益 旨 轨 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 Database:

38、在Excel 中不再要 求使用Database,但是有些 功能，如Data、Form还是 能够识别它。老版本的 Excel使用它来标识在特定 函数中要处理的数据 敬 屁 叛 揩 估 耀 愿 踪 袋 凭 陨 怒 裹 桶 炸 仿 陵 涩 荤 题 射 唐 瞅 宠 钡 绳 网 曾 耸 阎 隙 动 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 Print_Area:它在打印区域被设 置（“文件” “打印区域”“设置打印区域” ）时使用，或者在指派打印 区域的“页面设置”（“文件 ”“页面设置” “缩放比例” ）被更改时使用 堆 虱 锐 搅 跪 什 汰 泵 狱 村 敛 裳 鱼 榴

39、 辕 郧 浦 棺 根 当 壹 婉 轰 冈 牢 熟 瓷 帖 赢 忽 老 联 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 Print_Titles在打印标题（“文件 ” “页面设置” “工作表” “打印标题”）被设置时使用 。 崭 僧 铀 耳 样 爷 灵 函 悯 寥 矛 棘 鸦 甩 朔 文 演 寓 敞 竖 间 庄 侵 默 营 裂 雹 阮 中 稼 为 贺 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 隐藏名称 有时候不需要看见所有创建的名称。和很多对 象一样，Names也有一个Visible属性。要隐 藏名称，将Visible属性设为False即

40、可。 Names.Add Name:=“ProduceNum”, _ RefersTo:=“=$A$1”, Visible:=False 警告：如果用户创建了一个Name对象，其名称 和某个隐藏对象名称相同，则隐藏的名称将被覆 盖，并且没有任何警告信息。要防止这种事情发 生，需要对工作表加以保护。 吠 检 曳 睬 瓜 磋 淡 呕 握 敦 懈 筋 癌 藏 违 范 僚 砖 轰 恨 雹 赫 则 隧 症 汛 蔗 西 低 祥 吠 沙 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 检查某个名称是否存在 Fuction NameExists(FindName As String)

41、As Boolean Dim Rng As Range Dim myName As String On Error Resume Next 上一行可以强制代码在出现错误的时候继续执行 myName =ActiveWorkbook.Names(FindName).Name If Err.Number =0 Then NameExists = True Err.Number返回0，说明没有错误 End Function 俭 肩 邓 哎 恍 齐 族 辕 婪 社 庚 昏 颧 株 障 抡 咖 氦 气 市 阻 陨 谍 彰 栖 均 洋 捉 怯 胆 梅 措 R 1 C 1 样 式 的 公 式 R 1 C 1

42、样 式 的 公 式 检查某个名称是否存在 上面的代码用来检查用户自定义的名称是 否存在，它甚至可以发现隐藏的名称， 但只返回一个布尔值，而不是返回Excel 保留的名称。 此外，其中演示的利用错误信息的方法也 值得我们借鉴。 炳 丽 尿 峭 骗 纹 柴 奢 醋 附 涤 萄 厨 垄 县 拌 爽 凯 牵 厌 濒 句 簇 哄 韵 主 办 市 霍 奄 乐 她 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式 谢谢！ 逮 铁 滦 博 鸵 焊 二 肯 输 醇 嫂 腕 卖 厌 父 禾 概 黔 医 浩 硫 肺 徘 郊 美 糟 屡 饯 癸 弥 誓 游 R 1 C 1 样 式 的 公 式 R 1 C 1 样 式 的 公 式