Board logo

标题: VBS如何操作EXCEL [打印本页]
作者: changepll    时间: 2008-9-16 18:28     标题: VBS如何操作EXCEL

小白一个.做报表时.经常需要把数据复制到另一个表格中,很是麻烦!
可不可以实现这样一个功能:A.xls中的表1的C380:E480复制到B.xls中的表2的C380:E480???
作者: youxi01    时间: 2008-9-16 18:44

绝对可以
不过对excel函数不是很熟，你去专门的excel论坛问问吧
作者: zqz0012005    时间: 2008-9-16 19:53

未测试，使用前请做好备份
  1. Set objExcel = CreateObject("Excel.Application")

  2. objExcel.Visible = false

  3. objExcel.DisplayAlerts = false

  4. 

  5. Set objWorkbook1 = objExcel.Workbooks.Open("C:\a.xls")

  6. Set objWorksheet1 = objWorkbook1.Worksheets(1)

  7. 

  8. Set objWorkbook2 = objExcel.Workbooks.Open("C:\b.xls")

  9. Set objWorksheet2 = objWorkbook2.Worksheets(1)

  10. 

  11. objWorksheet2.Cells(3,380).Value = objWorksheet1.Cells(3,380).Value

  12. objWorksheet2.Cells(5,480).Value = objWorksheet1.Cells(5,480).Value

  13. objWorkbook2.Save

  14. 

  15. objExcel.quit
复制代码
作者: BatHome    时间: 2008-9-16 19:55

　　上excelhome论坛去问问吧，那里有好几个微软的MVP，地址是：http://club.excelhome.net/。
作者: Batcher    时间: 2008-9-16 22:30

建议楼主自学VBA



欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2