当前位置: 主页 > Office办公 > Excel专区 > Excel教程 > Excel2003教程 > 如何编写程序为Excel单元格添加公式

如何编写程序为Excel单元格添加公式

  • 2023-02-23
  • 来源/作者: Wps Office教程网/ 菜鸟图库
  • 112 次浏览

  使用公式来对数据进行处理是Excel的常见操作,通过编写VBA程序能够方便快捷地向需要的单元格添加公式。以下是小编为您带来的关于编写程序为Excel单元格添加公式的方法,希望对您有所帮助。

  编写程序为Excel单元格添加公式的方法

  1、启动Excel并打开工作表,如图1所示。这是一个成绩表,现在需要向“总分”列添加求和公式来计算各科的总分。下面通过编写VBA程序来实现公式的添加操作。

  图1 需要处理的工作表

  2、打开Visual Basic编辑器,在工程资源管理器中添加一个模块,在该模块的“代码”窗口中输入如下程序代码:

  Sub Gongshi()

  Sheet1.Range("G2:G20").FormulaR1C1="=sum(rc[-4]:rc[-1])"

  End Sub

  提示

  在VBA中,Range对象的Formula和FormulaR1C1这两个属性都能用来设置公式。Formula属性返回或设置指定对象的公式,该公式是使用A1样式表示的公式;FormulaR1C1属性返回或设置指定对象的公式,该公式是使用R1C1样式表示的公式。

  3、按F5键运行程序,指定的单元格区域中将填充公式并获得计算结果,如图2所示。

  图2 填充公式并获得计算结果