VBS读取已打开的Excel的值

Question

假设一个Excel被手动打开了，我怎么再用VBS向这个已打开的Excel文件中的某个单元格读数据，或者写数据，或者保存、关闭已打开的Excel文件？

Answer 1

set xlapp=getobject(,"excel.application")
set xlbook=xlapp.workbooks("工作簿1")
set xlsheet=xlbook.sheets("sheet1")
msgbox xlsheet.range("a1")'''读取数据
xlsheet.range("a1")=10000''''写数据
xlbook.save'''未保存过用saveas 路径 这是保存
xlbook.close true ''关闭工作簿1
xlapp.quit '''退出excel