运行带宏的excel

来源:互联网 发布:企业网络布线论文 编辑:程序博客网 时间:2024/05/01 09:38

Function GetExportInfo()

    Dim xl As excel.Workbooks
  
 
    Set xl = excel.Workbooks
    xl.Open ("路径")
   
    xl.Application.Run ("文件名!宏名")
    excel.Application.Visible = True
 
   
End Function