VB连接已经打开的EXCEL文件

Question

求帮助，现有EXCEL已经打开，如何实现连接已经打开的EXCEL然后对任意的SHEET进行操作？
Dim xlapp1 As Excel.Application 
Dim xlbook1 As Excel.Workbook 
Dim xlsheet1 As Excel.Worksheet Set xlapp = CreateObject("Excel.Application")
Set xlbook = ？？？？？————————————这里是不是填上什么代码就解决了？
Set xlsheet = xlbook.Worksheets("页码")求大神帮助

Answer 1

Set xlbook = ？？？？？————————————这里是不是填上什么代码就解决了？这里填写的应该xlapp打开文件或创建文件后的工作本实例...对于已经打开的进程好像不能直接操作吧

Answer 2

Set xlapp1 = GetObject(, "Excel.Application") '取得现有实例
Set xlbook1 = xlapp1.Workbooks("Book1.xls") '按文件名取得打开的文件

Answer 3

能否考虑excel的宏命令啊，我只是猜想一下。