EXCEL中的VBA代码 可以做到 直接关闭 指定 123.xlsx 而不提示 保存对话框
Sub Macro1()
Dim wb As Workbook
For Each wb In Workbooks
MsgBox (wb.Name)
If wb.Name = "123.xlsx" Then wb.Close False ' "a"改为真实的文件名
Next
End Sub
能以此为突破口 变通解决这一问题不。
如果 123.xlsx EXCEL文件 已打开。则新建立一个 EXCEL工作薄 AA，向其中写入 这个 VBA代码 ，执行这个VBA代码，无条件关闭 123.xlsx 文件
关闭 刚才建立 的 EXCEL工作薄 AA
如何向 打开 的EXCEL文件里 写入 VBA代码，并执行 这个宏
帮助 里说
如果你是Excel的资深用户，一定会留恋VBA，实际上你的VBA知识在Foxtable一样有用，原来的VBA代码只需稍作修改，就可以在Foxtable中使用。
Foxtable本身已经提供了很强大的Excel报表功能，可以利用报表模板来批量生成各种复杂的报表，所以本节的内容对于一般用户来说并无意义。
那么 这段VBA代码 如何修改 以在 FOXTABLE中运行：
Sub Macro1()
Dim wb As Workbook
For Each wb In Workbooks
MsgBox (wb.Name)
If wb.Name = "123.xlsx" Then wb.Close False
Next
End Sub
加好友 
发短信
Post By：2016/8/11 18:11:00 [只看该作者]
