用简单的VBA实现Excel表格计算
来源:互联网 发布:Mac book调不了声音了 编辑:程序博客网 时间:2024/04/28 00:19
利用Excel制作电子表格时,有时需要用到计算填充功能,比如某列每种元件的价格合计,就是由E列元件单价乘以D列元件数量得来的。通过分析,发现利用Excel提供的VBA(VisualBasicforApplication)功能,写几行Basic代码即可方便地达到自动填充F列数据的目的,且计算结果为纯数据值,可以自由进行处理。具体实现步骤如下:
1. 建立Excel工作表,分别填入其它相应的数据,包括E列元件的单价和D列元件数量。
2. 点击“视图”→“工具栏”→“VisualBasic”→VB控件工具箱。
3. 在整个工作表的底部或适当的位置放置控制按钮“CommandButton1”。
4. 双击控制按钮,加入语句:
PrivateSubCommandButton1_Click()
DimiAsInteger’自动填充的行号
DimrandAsString’工作表D列的范围参数
DimraneAsString’工作表E列的范围参数
DimranfAsString’工作表F列的范围参数
Fori=2To12’12为本例中给出的填充结果行号,可由使用者自己设定’该循环主要完成工作表F列计算表格的自动填充
rand=″D″+CStr(i)
rane=″E″+CStr(i)
ranf=″F″+CStr(i)
Worksheets(″Sheet1″).Range(ranf)=Worksheets(″Sheet1″).Range(rand)*Worksheets(″Sheet1″).Range(rane)NextiEndSub
5. 按执行键,就可达到设计要求的计算表格项的自动填充,且填充结果为纯数据。
1. 建立Excel工作表,分别填入其它相应的数据,包括E列元件的单价和D列元件数量。
2. 点击“视图”→“工具栏”→“VisualBasic”→VB控件工具箱。
3. 在整个工作表的底部或适当的位置放置控制按钮“CommandButton1”。
4. 双击控制按钮,加入语句:
PrivateSubCommandButton1_Click()
DimiAsInteger’自动填充的行号
DimrandAsString’工作表D列的范围参数
DimraneAsString’工作表E列的范围参数
DimranfAsString’工作表F列的范围参数
Fori=2To12’12为本例中给出的填充结果行号,可由使用者自己设定’该循环主要完成工作表F列计算表格的自动填充
rand=″D″+CStr(i)
rane=″E″+CStr(i)
ranf=″F″+CStr(i)
Worksheets(″Sheet1″).Range(ranf)=Worksheets(″Sheet1″).Range(rand)*Worksheets(″Sheet1″).Range(rane)NextiEndSub
5. 按执行键,就可达到设计要求的计算表格项的自动填充,且填充结果为纯数据。
Excel提供了VBA功能,使我们可以根据需要对其进行适当的二次开发,仔细研究其用法,会使制作电子表格的工作更加轻松。
- 用简单的VBA实现Excel表格计算
- VBA 控制 Excel 制作表格的例子
- 使用VBA实现简单的EXCEL异或操作
- vba拆分excel表格
- 简单实例:Access VBA打开Excel表格然后关闭
- 利用VBA实现多个EXCEL表格合并
- 利用Apache POI 实现简单的Excel表格导出
- 使用Apach poi 实现对Excel表格的简单读写
- 【初识VBA】用VBA简单处理excel数据
- 用EXCEL实现三级联动的vba代码
- 简单的导出excel 表格
- excel VBA 简单操作
- 用VBA得到EXCEL表格中的行数和列数
- 用VBA得到EXCEL表格中的行数和列数
- 用VBA得到EXCEL表格中的行数和列数
- 用VBA得到EXCEL表格中的行数和列数
- 用VBA得到EXCEL表格中的行数和列数
- 用VBA得到EXCEL表格中的行数和列数
- 获取用户需求的十大沟通技巧
- 厦门·博饼
- Microsoft Excel VBA Examples
- perl Protocols.Bittorrent
- .net程序员面试题
- 用简单的VBA实现Excel表格计算
- btpeer C++ bittorrent client Documentation
- 汗颜
- 05/09/18
- 这一周发生了好多事情
- Velocity plugin for eclipse 3.0
- 当你在重庆三峡学院上大学
- 隨便。。。
- 高德纳(Don Knuth) vs. W3C