[已解决]EXCEL 關閉excel 临时BOOK

w13579

为解决宏独立性 不影响其他EXCEL操作 特
Sub noek1()
Workbooks.Add
With Workbooks(Workbooks.count)

求一段 代码关闭此临时BOOK  不保存不留档
Next
End With
End Sub

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2013-2-2 17:33

或者你在添加把把临时的工作簿赋值给变量

1. dim wbTemp as workbook
   
2. set wbTemp=workbooks.add
   
3. ...
   
4. wbtemp.close false
   
5. set wbtemp=nothing

复制代码

跳转到最佳答案楼层

hwc2ycy

如果没有用代码切换工作簿
当前的活动工作簿就是临时的。

1. activeworkbook.close false

复制代码

hwc2ycy

或者你在添加把把临时的工作簿赋值给变量

1. dim wbTemp as workbook
   
2. set wbTemp=workbooks.add
   
3. ...
   
4. wbtemp.close false
   
5. set wbtemp=nothing

复制代码

w13579

hwc2ycy 发表于 2013-2-2 17:33
或者你在添加把把临时的工作簿赋值给变量

{:321:}有你真好{:221:}

hwc2ycy

{:3912:}{:101:}

w13579

hwc2ycy 发表于 2013-2-2 17:32
如果没有用代码切换工作簿
当前的活动工作簿就是临时的。

Sub vip()
Dim wbTemp As Workbook
Set wbTemp = Workbooks.Add
Application.Visible = False
bsk34
count
wbTemp.Close False
Set wbTemp = Nothing
End Sub
隱藏單個EXCEL 可以麼？

hwc2ycy

这个是隐藏当前的EXCEL APP。