VB如何操作EXCEL中的宏命令

首先在Excel里面录制宏。

然后在VB"工程"菜单中选择"引用"栏；选择Microsoft Excel x.x Object Library
在VB里设置一个按钮Button1

以下代码：
Sub button1_click()

Dim xlApp As Excel.Application
Dim xlBook As Excel.WorkBook
Dim xlSheet As Excel.Worksheet
Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象
Set xlBook = xlApp.Workbooks.Open("文件名") '打开已经存在的EXCEL工件簿文件
xlApp.Visible = True '设置EXCEL对象可见（或不可见）
Set xlSheet = xlBook.Worksheets("表名") '设置活动工作表

With xlSheet

'在这里，把你在Excel里面录制的宏复制到下面，适当修改一下，例如

.Cells(1,1) = “'给单元格（A1）赋值”
.PrintOut '打印工作表
End With

xlBook .Close (True) '关闭工作簿
xlApp.Quit '结束EXCEL对象
Set xlApp = Nothing '释放xlApp对象End Sub

如果是07版的，请点一下左上角那个大圆点，找到“EXCEl选项”，在弹出菜单的最下方右边一点，勾选常用里面的“在功能区显示开发工具选项卡”，确定。
点一下菜单栏中的“开发工具”，找到里面的“插入”，插入中的第一个就是“命令按钮”，然后点一下，在主表去随便画个框就出来了，然后双击刚画的框，就可以写针对这个按钮的vba程序了。
错了，最后一步要“右击” “指定宏” 然后就可以写了

有