Set xlApp = New Excel.Application
我写在声明,或模块里,都不行,报错,说只能写在过程里
但我需要在不同的过程里调用呀,希望是public的
该咋样写
呵呵,我是不是太弱了
以前从没引用过数据库之类的

解决方案 »

  1.   

    dim x1app as new excel.application
    or 
    public x1app as new excel.application
      

  2.   

    Public x1app As New Excel.application
    Private Sub Command1_Click()
    x1app.Visible = True
    End SubPrivate Sub Command2_Click()
    x1app.Quit
    End Sub
      

  3.   

    这个是生成实例的代码
    Set xlApp = New Excel.Application在模块中添加 public xlApp as new Excel.Application 即可
      

  4.   

    dim xlobj as Excel.Application
    set xlojb=createobject(excel.application)
      

  5.   

    Set xlApp = New Excel.Application 是在模块中生成实例如要在不同的过程中调用
    需要如下定义 public xlApp as new Excel.Application
      

  6.   

    查查以前李的帖子,里面有很多关于excel的内容的。
      

  7.   

    '声明
    public xlapp as excel.application'过程中。
    Private Sub Command2_Click()
    Set xlApp = New Excel.ApplicationEnd Sub