excelvba关闭excel文件夹

A. vba如何关闭一个指定excel文件

如果a是b通过vba调用excel application打开的, 那代码关闭它很容易
如果不是, 那需要调用windows API遍历目前所有进程, 然后判断哪个excel进程是需要关闭的, 关闭即可

B. VBA语言怎样单独关闭一个EXCEL文件

用ThisWorkbook.SaveCopyAs ()另存文件后就不会打开刚存的文件，可以继续处理原来的文件

C. 请帮修改VBA代码,如何关闭Excel

这是因为你的代码中，只是关闭了一个Excel文件。

事实上，应该关闭整个Excel软件。

VBA代码可以修改为：

Sub完成工作()
ActiveWorkbook.Save
ThisWorkbook.Application.Quit
'或者Application.Quit
EndSub

即可。

D. VBA怎样关闭工作簿和退出Excel

要用VBA来关闭工作簿，用Workbook.Close 方法即可，而要退出Excel，则用Application.Quit 方法：

关闭活动工作簿，如果工作簿有更改，提示是否保存：
Sub CloseWorkbook()
ActiveWorkbook.Close
End Sub

如果要避免出现提示，可添加“SaveChanges”参数，如直接保存并关闭工作簿：
Sub ClostAndSaveWorkbook()
ActiveWorkbook.Close Savechanges:=True
End Sub
将上述代码中的“True”改为“False”，则直接关闭工作簿而不保存。
关闭所有打开的工作簿，并提示是否保存：
Sub CloseAllWorkbooks()
On Error Resume Next
Workbooks.Close
End Sub
退出Excel，并提示对有更改的工作簿进行保存：
Sub QuitExcel()
Application.Quit
End Sub
保存活动工作簿并退出Excel：
Sub SaveActiveWorkAndQuit()
ActiveWorkbook.Save
Application.Quit
End Sub

下面的代码在退出Excel时都不会提示是否保存工作簿。
保存所有打开的工作簿并退出Excel：
Sub SaveAllAndQuit()
For Each wbk In Workbooks
wbk.Save
Next
Application.Quit
End Sub
退出Excel，所有的改动都不保存：
Sub QutiAndNoAlerts()
Application.DisplayAlerts = False
Application.Quit
End Sub

E. 如何在excel中使用vba关闭表格

vba关闭工作薄
如果是代码所在的就是thisworkbook.CLOSE
不过由于工作薄内容有修改的，要有提示窗口是否保存的
此处楼主可以考虑在关闭前保存，或者
thisworkbook.CLOSE
false
如果是其他打开的工作簿，就使用workbooks("文件名").close
另外可以使用application.quit关闭所有工作薄，就是关闭exce应用的

F. VBA 如何关闭指定的多个excel文件，如果指定的多个文件中有几个并未打开，如何跳过未打开的文件。

您可以参考下面的代码，看看能否帮到你
Sub closeObject()
Dim xlExcel As Object, wb1 As Workbook, wb2 As Workbook, wb3 As Workbook, wb4 As Workbook, wb5 As Workbook
Set xlExcel = CreateObject("excel.application")
Set wb1 = xlExcel.workboos("1#站每日库存表.xlsm")
Set wb2 = xlExcel.workboos("4#站每日库存表.xlsm")
Set wb3 = xlExcel.workboos("16#站每日库存表.xlsm")
Set wb4 = xlExcel.workboos("27#站每日库存表.xlsm")
Set wb5 = xlExcel.workboos("76#站每日库存表.xlsm")
If wb1 Is Nothing Then
MsgBox "1#站每日库存表 不存在", vbOKOnly, "===> Warning"
Else
wb1.Close False
End If
If wb2 Is Nothing Then
MsgBox "4#站每日库存表.x不存在", vbOKOnly, "===> Warning"
Else
wb2.Close False
End If
If wb3 Is Nothing Then
MsgBox "16#站每日库存表 不存在", vbOKOnly, "===> Warning"
Else
wb3.Close False
End If
If wb4 Is Nothing Then
MsgBox "27#站每日库存表 不存在", vbOKOnly, "===> Warning"
Else
wb4.Close False
End If
If wb5 Is Nothing Then
MsgBox "76#站每日库存表 不存在", vbOKOnly, "===> Warning"
Else
wb5.Close False
End If

End Sub

G. excel vba 关闭已打开的文件夹

试下 WINDOWS("文件夹名").close

H. vba 关闭excel文件问题

我的电脑试验ok，最后保留excel程序界面，workbook关闭。

I. excelvba关闭已打开的文件夹

我来告诉你标准答案!你是要关闭别的工作簿，还是自身呢？自己的话就是activeworkbook.closetrue其他的话，你可以这样setwk=workbooks.open(路径)一次打开并定义名称为WK操作这工作簿wk.closefalse（保存的话就改成true）