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. Set objWorkbook1 = objExcel.Workbooks.Open("C:\a.xls")
  5. Set objWorksheet1 = objWorkbook1.Worksheets(1)
  6. Set objWorkbook2 = objExcel.Workbooks.Open("C:\b.xls")
  7. Set objWorksheet2 = objWorkbook2.Worksheets(1)
  8. objWorksheet2.Cells(3,380).Value = objWorksheet1.Cells(3,380).Value
  9. objWorksheet2.Cells(5,480).Value = objWorksheet1.Cells(5,480).Value
  10. objWorkbook2.Save
  11. objExcel.quit
复制代码

作者: BatHome    时间: 2008-9-16 19:55

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

建议楼主自学VBA




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