利用VBA实现Excel表格计算
发布时间：2023-05-06 09:54:45
利用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. 按执行键，就可达到设计要求的计算表格项的自动填充，且填充结果为纯数据。
Excel提供了VBA功能，使我们可以根据需要对其进行适当的二次开发，仔细研究其用法，会使制作电子表格的工作更加轻松。
0
投稿猜你喜欢
如果你从一个地方搬到另一个地方，这两个地方跨越了时区。你的Windows8系统还停留在原来的时区，就会带来一些不必要的麻烦。最好是要更改时区- 1.打开Word文档，点击工具栏左上角的“Office按钮”然后选择进入“Word选项”。 2.在Word选项里点
- 表格是写文档中常会使用的工具之一，今天小编为大家介绍一下如何在wps文字中设置表格边框。首先在表格中的任意位置右击，在右击菜单中选择“边框和
- 我身边不少朋友，已经陆陆续续复工了。很多人又要开始愁眉苦脸，因为总免不了处理各种新的数据，做表、做PPT汇报工作。今天，就为大家推荐一款有点
- 神舟品牌笔记本怎么用U盘启动进PE重装系统？神舟笔记本电脑如何使用快捷键进行U盘启动重装系统？下面就给大家介绍神舟笔记本电脑使用快捷键进行U
- WPS文字打印时怎么设置装订线1.打开WPS文本2013，然后单击文本-文件-页面设置。2.在页边距选项卡中设置装订线的位置和装订线宽度。3
- 对于wps表格的制作，怎么去导出pdf呢?下面小编就为你介绍wps表格如何导出pdf的方法啦!wps表格导出pdf的方法：1.用wps201
- 我们在下载了win10操作系统准备进行安装的时候，有的小伙伴如果遇到了下载的雨林木风win10系统不能自动安装的问题，小编觉得可能是我们下载
- Word2013转换兼容模式的方法：①打开文档，我们看到文档是兼容模式。 ②现在我们要进行转换，单击文件--信息-
- 不管是在工作还是学习或者生活当中我们都可以用到WPS，我们会经常遇到需要做表格的时候，wps的excel中是专门做表格的，但是小编本人不是很
- Win7怎么关闭自动播放功能？大家都知道Windows系统自带有自动播放功能，如果我们开启了自动播放功能，只要我们将光碟等存储器插入电脑中，
- WPS演示怎么导入电脑中本地的PPT模板使用教学。如果你想要更快速的去创建一个PPT文档，那么就可以去使用电脑中本地的一些幻灯片模板，使用它
- 若是你的打印机经常在Win7系统中提示spoolsv.exe-应用程序错误，大概是因为用户禁用了其服务自启动，当然也不排除注册表值被恶意修改
- PPT2013怎么制作一段情人节动画效果？想要制作一个情人节的动画，该怎么制作呢？我们可以使用ppt来制作情人节动画，下面我们就来看看详细的
- 在通常的工作中，我们经常需要对本地安全策略进行一些设置，但是很多用户不知道Win7本地安全策略在哪里？ 其实这个问题很简单。如果您不知道Wi
- win10电脑屏幕比例变大了怎么调？有的win10用户在使用电脑的过程中发现屏幕比例突然变大了，这种情况要怎么办呢？怎么调才能恢复正常呢？很
- 我们在使用Win电脑浏览网页时，难免会跳出一些莫名其妙的垃圾网站，觉得很烦人，其实我们可以把这些网站屏蔽掉的，下面小编就给大家分享下Win7
- WPS是金山公司出品的一款办公软件，在平常的工作中我们常常会使用到它，特别是当我们在编辑文档的时候我们可能就需要用到它来打分数，那么WPS要
- OCX是一款ActiveX控件，最近有用户反馈在win10系统 * 册OCX控件系统突然报错提示错误代码0x80040200，如何解决这个问题
- Windows RT系统放出下载后似乎又出现了一些小问题，部分用户反映系统导致设备电池续航不足，耗电比此前严重，下面为大家分享下微软已经放出
