别人给我写的一个程序 Set a = CreateObject("Excel.Application")没看懂

PrivateSubForm_Load()DimaAsObjectDimbAsObjectDimcAsObjectSeta=CreateObject("Excel.App... Private Sub Form_Load()
Dim a As Object
Dim b As Object
Dim c As Object
Set a = CreateObject("Excel.Application") ‘这是什么意思啊???????
Set b = a.Workbooks.Add
Set c = b.Worksheets(1)
b.SaveAs App.Path & "\" & c.Name & ".xlsx"
'b.saveAs App.Path & "\" & c.Cells(1,1).value & ".xlsx"
a.Visible = False
End Sub
展开
 我来答
苦乐一辈子
2014-04-03 · TA获得超过1536个赞
知道大有可为答主
回答量:1410
采纳率:64%
帮助的人:1045万
展开全部
Set a = CreateObject("Excel.Application")
建立一个excel模型给a
下面a就相当于开着excel,可以用它下面的命令
Workbooks.Add 新增工作簿 等等
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
dlbabo
2014-04-03 · TA获得超过5676个赞
知道大有可为答主
回答量:2016
采纳率:57%
帮助的人:1548万
展开全部
把 a 定义成一个EXCEL对象。
这样 Workbooks 的属性才能属于a.
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式