十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
你的宏命令是指EXCEL里的宏吧,如果是这样,你可以这样做,打开EXCEL
创新互联建站专注于企业全网整合营销推广、网站重做改版、清镇网站定制设计、自适应品牌网站建设、H5开发、商城系统网站开发、集团公司官网建设、外贸网站建设、高端网站制作、响应式网页设计等建站业务,价格优惠性价比高,为清镇等各大城市提供网站开发制作服务。
在工具-宏-VB编辑器
在里面新建一个模块,在模块里增加一个过程
Public Sub auto_open()
这里面添加你要自动执行的命令
end sub
先创建一个模板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
宏就是程序,在OFFICE组件,如WORD,POWERPOINT,ACCESS,EXCEL的工具菜单里面有一个宏的菜单项,他的子菜单就是,进入之后类似VB编程.