vb如何获取已经打开的workbook对象，或者怎么把这个excel关闭

我是想如果已经打开，那么直接操作这个文件，如果没打开，那么去打开并操作，我现在不知道如何去操作一个已经手动打开的文件，我这样写，还是会打开一个新的窗口
If IsOpen("D:\VBA_" & filenameMain) Then
Set newBook = GetObject("D:\VBA_" & filenameMain)
Else
Set newBook = newapp.Workbooks.Open("D:\VBA_" & filenameMain)
End If

举报该问题

推荐答案推荐于2016-05-11

直接 geobject(文件路径) 就好了，如果打开了会直接获得对象，如果没有打开会自动打开。追问

我现在就是用的getobject，但是还是会打开新的窗口

温馨提示：答案为网友推荐，仅供参考

当前网址：http://66.wendadaohang.com/zd/DpDDnpDUUpisspDDDD.html

相似回答

VB编程如何打开和关闭EXCEL文件?答：一、用定长的String变量获取文本内容。由于定长String变量支持的下界为65400,所以在打开超过32K字节的文件时超出部分的字节将无法获取: Private Sub Command1_Cliack() Dim sA As String * 65400 '声明定长String变量 Open "F:\d.txt " For Binary As #1 ...

用VB调用已经打开的EXCEL文档答：1、在VB中，建立一个FORM，在其上放置两个命令按钮，将Command1的Caption属性改为EXCEL，Command2的Caption属性改为End。然后在其中输入如下程序：Dim xlApp As Excel.Application '定义EXCEL类 Dim xlBook As Excel.Workbook '定义工件簿类 Dim xlsheet As Excel.Worksheet '定义工作表类 Private Sub ...

请问怎么用vb6操作已经打开的excel表格文件答：一、检查是否你已经手动打开了c:\1.xls文件?Set xlBook = xlApp.Workbooks.open("c:\1.xls") 语句的意思是打开c:\1.xls文件,因此,对于已经打开的c:\1.xls文件,不能执行 Set xlBook = xlApp.Workbooks.open("c:\1.xls") 语句。二、在每次执行完xlApp对象,需要关闭它才可以再次用代码打开。如果不关...

各位好,我用vb程序打开excel,可是在vb里面无法探测到是否打开了excel,怎...答：book Exit For End If Next If pdbz = False Then Set xlBook = ExcelApp.WorkBooks.Open(App.Path & "\中药数据表.xls") '打开EXCEL工作簿 End If End If ExcelApp.Visible = False '设置EXCEL可见 Set xlSheet = xlBook.Worksheets(1) '打开EXCEL工作表 xlSheet.Activate '激活工作表 ...

vb 如何关闭所有打开的EXCEL文件答：alt+ctrl+delete→单击“进程”选项卡→点击“excel.exe”→结束进程，全部关闭！但好像不能提示你是不是要保存，要注意了

用VB打开EXCEL文件之后,如何关闭它答：如果使用了Dim MyExcel As New Excel.Application这种方法打开的话可以使用MyExcel.Quit关闭打开的Excel。

大家正在搜

vb对象属性的值如何确定 vb中的对象有哪几个每个vb对象都具有的属性 vb一个对象 vb中最基本的对象是 vb要求对象是什么意思 vb要求对象是什么错了 vb中的对象名 vb中属于对象的方法

如何用vb关闭已经打开的excel文件

vb调用excel后如何将excel彻底关闭

vb怎样打开excel关闭再打开

VB调用EXCEL时怎样让创建的EXCEL对象包括workb...

VB6.0如何判断excel文件是否已打开？

VB 打开Excel 提示对象 “Open” 方法“wor...

vb 如何编辑已打开的excel？

如何在VB中，调用Excel.Application对象