恭喜,你发布的帖子
发布于 2021-02-22 14:42:39
1楼
Dim fso,myfile
Set fso = CreateObject("scripting.FileSystemObject")
Set myfile = fso.GetFile("C:\Users\DELL\Desktop\data.xlsx")
Dim ObjExcelApp
Set ObjExcelApp = CreateObject("Excel.Application")
ObjExcelApp.Workbooks.Open myfile
'上面的程序段是为了打开excel文件
请填写推广理由:
分享
只看
楼主