创业者读文章:Excel中自动填充计算表格项

来源：百度文库编辑：中财网时间：2024/05/06 11:45:29

2003-01-28· ·王彪··Yesky
利用Excel制作电子表格时，有时需要用到计算填充功能，F列每种元件的价格合计，就是由E列元件单价乘以D列元件数量得来的。通过分析，发现利用Excel97提供的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. 按执行键，就可达到设计要求的计算表格项的自动填充，且填充结果为纯数据。
Excel97提供了VBA功能，使我们可以根据需要对其进行适当的二次开发，仔细研究其用法，会使制作电子表格的工作更加轻松。
【责任编辑：】

【发表评论】
■ 相关内容
在Excel97中快速输入数据
巧用Excel497的三维引用汇总报表数据
Excel97快速汇总求和
修复受损 Excel 文件的法宝
感谢访问天极网，如果您觉得该文章涉及版权问题，请看这里！

EXCEL中自动填充颜色在excel中该如何自动填充？~~~~ excel中如何实现自动填充 excel表格中的计算式自动计算 EXCEL自动填充日期电脑Excel表格中,如何自动求和? excel自动填充中遇到的棘手问题 Excel表格计算错误? Excel怎么实现自动填充 excel如何自动填充行 Excel表格不能填充颜色,高手请进 Access/Excel表格填充,有点难度 excel中有自动计算功能吗 excel表格中怎么输入并计算体积 Excel表格中能计算时间段吗？如何输入函数？ EXCEL中不同表格不同位置数值之和如何计算？ EXCEL的自动填充功能，可以自动填充什么 EXCEL表格计算的问题 Excel表格怎样计算年龄如何在EXCEL表格中打印时自动添加表头我想问一下Excel中，如何自动添加表格底色。？如何在EXCEL表格中设置自动显示功能？ excel 中如何建立分类下拉列表填充项 EXCEL好难学，什么是自动填充柄啊？