我做的一个图纸拆分程序,以前是生成XML,现在想把图名图号等信息导出到EXCEL中,请问具体怎么弄,我是初学者,请各位指点一下,多谢!

解决方案 »

  1.   

    这样说吧: 如何把变量里的内容导出,生成EXCEL文件!请指点!
      

  2.   

    很简单,如果是使用VBA的话,首先引用Excel的类库,而后给你具体的代码例子    Dim xlApp As Excel.Application
        Dim xlBook As Excel.Workbook
        Dim xlBookWai As Excel.Workbook
        Dim xlBookNei As Excel.Workbook
        Dim xlSheet As Excel.Worksheet    Set xlApp = New Excel.Application
        Set xlBook = xlApp.Workbooks.Open(ThisDrawing.Path + "\AAA.XLS")
        Range("A1") = "图名"
        Range("B1") = "图号"
        Range("A2") = "Map1"
        Range("B2") = "111-3"
        xlBook.save
        xlBook.close
        set xlApp=nothing