如何用vb调用excel vba程序

要先创建一个test.xls

Sub Btn1_onclick()

call OpenWorkbook("Test.xls")

End Sub

Sub OpenWorkbook(strLocation)

Set objExcel = CreateObject("Excel.Application")

objExcel.Workbooks.Open strLocation

objExcel.Visible = true

objExcel.WindowState = xlMinimized

objExcel.WindowState = vbMaximizedFocus

objExcel.WindowState = vbMaximized

objExcel.UserControl = true

End Sub

Visual Basic是一种由 公司开发的结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。从任何标准来说，VB都是世界上使用人数最多的语言——不管是盛赞VB的开发者还是抱怨VB的开发者的腔咐基数量。它源自于BASIC编程语言。VB拥有图形用户简兆界面（GUI）和快速应用程序开发伍谨（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。

1、按ALT+F11调出EXCEL中配态VBA界面。

2、右键插入一个模块。

3、首先新建一个子程序，如图，填写公式进去。

4、for 是可以从任意隐模数字开始和结束的，如图，我们从第2行到第10行。点击运行后，依次计算并填写完成。

5、接下来，用同样方法写完求平均数公式。

6、同样，运行后，可以看到，不均数也填写完成了。

7、这样填写的是公式，仔细观察，会发现相当于我们自动输入了公式，而不是计算后的培携源值。

---