EXCEL VBA编程基础
Excel 最重要的应用就是利用公式进行计算。无论输入是纯粹的数字运算，还是引用其他单元格计算，只要在一个单元格中输入公式，就能得到结果。这个直接显示结果的设计对于绝大多数场合来说都是适用的，但某些情况下就不那么让人满意了。比如说在做工程施工的预结算编写，使用Excel，既要写出工程量的计算式，也要看到它的结果，于是这样相同的公式在Excel里面要填两次，一次在文本格式的单元格中输入公式，一次是在数据格式的单元格中输入公式让Excel计算结果。如何既能看到公式又能看到结果呢？这个问题笔者认为可以从两个方面考虑：一种方法是所谓“已知结果，显示公式”，先在数据格式单元格中输入公式让Excel计算结果，然后在相邻的单元格中看到公式；另一种方法所谓“已知公式，显示结果”，就是先在一个文本格式的单元格中输入公式，在相邻的单元格中看到结果。
★已知结果，显示公式
假设C列为通过公式计算得到的结果（假设C1为“=A1+B1”，或者直接是数字运算“=2+3”)，而相邻的D列是你需要显示公式的地方（即D1应该显示为“=A1+B1”或者“=2+3”）。
1. 打开“工具”菜单选择“选项”命令，出现“选项”对话框。
2. 在“常规”选项卡中，选中“R1C1引用方式”选项。
3. 定义名称，将“引用位置”由“=GET.CELL(6,Sheet1!RC[-1])”即可。这里的RC[-1]含义是如果在当前单元格的同行前一列单元格中有公式结果，则在当前单元格中得到公式内容，即在含公式结果单元格的同行后一列单元格显示公式内容；如果将RC[-1]改为RC[1]，则在公式结果的同行前一列单元格显示公式内容。
4. 如果“引用位置”中含有“RC[-1]”，则在含公式结果单元格的同行后一列单元格中输入“=FormulaofResult”即可得到公式；如果“引用位置”中含有“RC[1]”，则在含公式结果单元格的同行前一列单元格中输入“=FormulaofResult”即可得到公式。
提示：如果想要在含公式结果单元格的同行后数第2列中显示公式内容，则需要把“引用位置”中的“RC －1 ”改为“RC －2 ”。
--ll函数说明
函数定义:
GET.CELL(类型号,单元格(或范围))
实例：
比如现在我们要取得A1单元格里的数据格式?结果显示在B1步骤如下:
1.任选一个单元格-->插入--->名称-->定义
2.在名称称输入AA(任意名称)
3.在引用位置上写入=GET.CELL(7,Sheet1!$A$1)
4.点添加
5.在B1单元格里输入=AA
其中类型号,即你想要得到的信息的类型号,可以在1-66(表示可以返回一个单元格里66种你要的信息)
最有前途的编程语言
以下是类型号及代表的意思
1 参照储存格的绝对地址
2 参照储存格的列号
3 参照储存格的栏号
4 类似TYPE函数
5 参照地址的内容
6 文字显示参照位址的公式
7 参照位址的格式，文字显示
8 文字显示参照位址的格式
9 传回储存格外框左方样式，数字显示
10 传回储存格外框右方样式，数字显示
11 传回储存格外框方上样式，数字显示
12 传回储存格外框方下样式，数字显示
13 传回内部图样，数字显示
14 如果储存格被设定locked传回True
15 如果公式处于隐藏状态传回True
16 传回储存格宽度
17 以点为单位传回储存格高度
18 字型名称
19 以点为单位元传回字号
20 如果储存格所有或第一个字符为加粗传回 True
21 如果储存格所有或第一个字符为斜体传回 True
22 如果储存格所有或第一个字符为单底线传回True
23 如果储存格所有或第一个字符字型中间加了一条水平线传回 True
24 传回储存格第一个字符彩数字， 1 至 56。如果设定为自动，传回0
25 MS Excel不支持大纲格式
26 MS Excel不支持阴影格式
27 数字显示手动插入的分页线设定
28 大纲的列层次
29 大纲的栏层次
30 如果范围为大纲的摘要列则为 True
31 如果范围为大纲的摘要栏则为 True
32 显示活页簿和工作表名称
33 如果储存格格式为多行文字则为 True
34 传回储存格外框左方彩，数字显示。如果设定为自动，传回 0
35 传回储存格外框右方彩，数字显示。如果设定为自动，传回 0
36 传回储存格外框上方彩，数字显示。如果设定为自动，传回 0
37 传回储存格外框下方彩，数字显示。如果设定为自动，传回 0
38 传回储存格前景阴影彩，数字显示。如果设定为自动，传回 0
39 传回储存格背影阴影彩，数字显示。如果设定为自动，传回 0
40 文字显示储存格样式
41 传回参照地址的原始公式
42 以点为单位传回使用中窗口左方至储存格左方水平距离
43 以点为单位传回使用中窗口上方至储存格上方垂直距离
44 以点为单位传回使用中窗口左方至储存格右方水平距离
45 以点为单位传回使用中窗口上方至储存格下方垂直距离
46 如果储存格有插入批注传回 True
47 如果储存格有插入声音提示传回 True
48 如果储存格有插入公式传回 True
49 如果储存格是数组公式的范围传回 True
50 传回储存格垂直对齐，数字显示
51 传回储存格垂直方向，数字显示
52 传回储存格前缀字符
53 文字显示传回储存格显示内容
54 传回储存格数据透视表名称
55 传回储存格在数据透视表的位置
56 枢纽分析
57 如果储存格所有或第一个字符为上标传回True
58 文字显示传回储存格所有或第一个字符字型样式
59 传回储存格底线样式，数字显示
60 如果储存格所有或第一个字符为下标传回True
61 枢纽分析
62 显示活页簿和工作表名称
63 传回储存格的填满彩
64 传回图样前景彩
65 枢纽分析
66 显示活页簿名称
--
★已知公式，显示结果
假设C列为输入的没有等号公式（假设C1为“A1+B1”)，而相邻的D列是你需要存放公式计算结果的地方（即D1显示A1和B1单元格相加的结果）。
1. 选中D1，然后打开“插入”菜单选择“名称”命令中的“定义”子命令，出现“定义名称”对话框。
2. 在“在当前工作表中的名称”输入栏中输入定义的名称“ResultofFomula”，在下方的“引用位置”编辑栏中输入“=EVALUATE(Sheet1!C1)”，单击[确认]按钮退出。
3. 在 D1中输入“=ResultofFomula”，然后选中按住右下角的填充柄向下拉动填充即可。
提示：EVALUATE 是Eexcel 4．0版的宏表函数，Excel 2000和Excel 2002中还支持，但只可用于名称定义中。
4. 填充后要按[F9]进行重算，如果C列的公式有改动，也需要及时按[F9]进行重算。
巧施妙计，就能让公式和结果在Excel中和平共处了，你也试试吧。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。