我这有很多,只是一时没法说清楚,你可以到网上下载一些,关于VBA的例子,很简单

解决方案 »

  1.   

    可是,为什么,下面的代码:
    Dim xlApp As Excel.Application
    Dim strDestination As String
    Dim xlbook As Excel.Workbook
    Dim xlsheet As Excel.WorksheetPrivate Sub Command1_Click()
    Set xlApp = New Excel.Application
    Set xlApp = CreateObject("Excel.Application")
    xlApp.Visible = True
    strDestination = App.Path + "\book.xls"
    Set xlbook = xlApp.Workbooks.Open(strDestination, , False)
    Set xlsheet = xlbook.Worksheets("sheet3")
    xlbook.Worksheets("sheet3").Select
    xlbook.PrintPreview
    xlbook.Save
    End SubSet xlApp = New Excel.Application出了问题:加载DLL错误
      

  2.   

    如果你是在vb里,你要先引用office对象另外,好像你的office必须是97以上版本才可以用Excel.Application
      

  3.   

    怎么引用?
    office97不行吗?
      

  4.   

    干嘛做的这么复杂!
    一句就够了:set xlbook=getobject(filename)
    或者用createobject,再用workbooks.open方法。
    总之,别定义的那么复杂!!")