恭喜,你发布的帖子
发布于 2021-02-23 19:03:46
2楼
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文件
谢谢,我编写了一个打开EXCEL的程序了,但在已经打开的EXCEL中,写不进去数据,应该先读到EXCEL相关信息,确定是哪个EXCEL才可以。
请填写推广理由:
分享
只看
楼主