如何隐藏工作簿2(book2)，系统已经打开了book1情况下。

[applehoo]

如何隐藏工作簿2(book2)，系统已经打开了book1情况下。

目的：我先打开了book1.xls，现在由于需要，需要隐藏方式打开book2.用完其内容（比如向book1-sheet1-A2写个数据）后在关闭book2.
根本就是：如何隐藏一个后打开的book2.xls.

VBA环境代码。别给VB的。谢谢！！

[jhone99]

Dim xlapp1 As Excel.Application
Dim xlbook1 As Excel.Workbook
Dim xlsheet1 As Excel.Worksheet

Private Sub CommandButton1_Click()


Set xlapp1 = CreateObject("Excel.Application")

Set xlbook1 = xlapp1.Workbooks.Open("d:\test1.xls")

Set xlsheet1 = xlbook1.Worksheets(1)


End Sub


Private Sub CommandButton2_Click()
xlapp1.Quit
Set xlapp1 = Nothing

End Sub

[lilicheng124]

设置xlApp1.Visible = True
试试看。

[applehoo]

xlapp1.visible 是控制整个excel程序的，隐藏后两个工作簿都会隐藏而不是隐藏book2.xls

[applehoo]

是我的表达不清楚吗？抱歉，在说一遍吧：主要就是：

我是说book1.打开状态，不去管它。

现在打开book2.xls.要求打开后是隐藏状态。