access vba中CREATEOBJECT 和getobject的区别

我前几天不是搞了个按钮要将报表输出到excel中么,

其中有行代码是需要打开excel这个程序的,

但是总是遇到问题,

运行到这里(Set xlApp = GetObject(, "Excel.Application") )就不行了,

后来我将代码改成------Set xlApp = CreateObject("Excel.Application")------居然就运行成功了,

这让我很奇怪,到底这个GetObject和这个CreateObject到底有什么区别,

于是我在百度上查------CREATEOBJECT 和getobject的区别

查到如下代码:

分别打开和关闭Word后运行下面代码你就知道它们的区别是什么了:
Sub Macro1()
    Dim MyWord As Object
    On Error Resume Next
    Set MyWord = GetObject(, "word.application")
    If Not MyWord Is Nothing Then
'        MyWord.Visible = True
        MsgBox "word已经打开"
    Else
        If MsgBox("word没有打开,是否开启?", vbYesNo) = vbYes Then
            Set MyWord = CreateObject("Word.Application")
            MyWord.Visible = True
        End If
    End If
End Sub

我的理解是,如果程序打开了,那么直接可以引用程序GetObject,

如果excel程序没有打开的话,就直接打开,这个时候需要用CreateObject函数.

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值