我想写个VBA程序 打开一个EXCEL文件
好象用 Application.ActiveWorkbook.OpenLinks “文件名”
不行 请指教

解决方案 »

  1.   

    Workbooks.Open Filename:= _
            "C:\Documents and Settings\陈锐\My Documents\Book3.xls"
      

  2.   

    教你方法:
    在引用内面添加Microsoft Excel ... Object Library
    Dim xls As New Excel.Application
    xls.Workbooks.Open ... //vb会自动提示你各种参数的信息你还可以参考EXCEL的帮助文件,内面有所有的VBA编译参考信息的
      

  3.   

    '引用Microsoft Excel X.0 Object Library
    Dim xlApp As Excel.Application
    Dim xlBook As Excel.Workbook
    Set xlApp = New Excel.Application
    Set xlBook = xlApp.Workbooks.Open("C:\Book1.xls")
    ......
    xlBook.Close False
    xlApp.Quit
    Set xlBook = Nothing
    Set xlApp = Nothing
      

  4.   

    我是在EXCEL的宏里写啊 楼上的几位都是在VB里的代码把?
      

  5.   

    顶一下 急用~~~
    现在本人的代码是在宏里写
    Dim app As Excel.Applicationapp.Workbooks.Open "f:\temp\ddd1.xls"
    但是OPEN完后EXCEL里未正确打开DDD1。XLS文件 而是在进程里开了新的EXCEL进程???
      

  6.   

    本示例打开 Analysis.xls 工作簿,然后运行 Auto_Open 宏。Workbooks.Open "ANALYSIS.XLS"
    ActiveWorkbook.RunAutoMacros xlAutoOpen