建立Excel对象:
Dim VBExcel As Excel.Application
Set VBExcel=CreateObject ("Excel.Application")
或打开一个EXCEl工作薄
Set AppExcel=GetObject("SAMP.XLS")
使用EXCEL公式:
answer=Application.WorksheetFunction.Min(myRange)
在调用的宏应该是全局的Public
ActiveWorkbook.PublicMacro
具体的你可以看看:360文档VB中操作Excel
360doc.com/content/11/1215/16/7531335_172476092.shtml
写得简单明了。
保持良好习惯,及时采纳哟。