工作簿 Book1.xls，但不提示用户保存所作更改。Book1.xls 中的所有更改都不会保存。
Application.DisplayAlerts = False
Workbooks("BOOK1.XLS").Close
Application.DisplayAlerts = True
一般情况下，如果某一应用程序未处于运行状态，那么当初始化与该应用程序相连的 DDE 通道时，将显示一条提示消息。本示例使该提示消息不显示。
Application.DisplayAlerts = False
channelNumber = Application.DDEInitiate( _
app:="WinWord", _
topic:="C:/WINWORD/FORMLETR.DOC")
Application.DisplayAlerts = True
Application.DDEExecute channelNumber, "[FILEPRINT]"
Application.DDETerminate channelNumber
Application.DisplayAlerts = True
工作簿 Book1.xls，但不提示用户保存所作更改。Book1.xls 中的所有更改都不会保存。Application.DisplayAlerts = FalseWorkbooks("BOOK1.XLS").CloseApplication.DisplayAlerts = True 一般情况下，如果某一应用程序未处于运行状态，那么当初始化与该应用程序相连的 DDE 通道时，将显示一条提示消
Sub test_open()
Dim wb As Workbook
Set wb = Workbooks.Open(Filename:="D:\每日例行\日报.xlsx", UpdateLinks:=0)
End Sub
这样就可以实现打开符合要求的文件，并且传入第二个参数，Updatelinks，取消是否更新链接
提示信息
，采用全部不更新的模式操作文件
启用宏后的excel保存时如果出现安全警告窗口提示，可以在保存前将个人信息设为false就不会出现警告，要恢复设为true。
ActiveWorkbook.RemovePersonalInformation=False
如果运行
vba
时屏幕刷新跳动而你想禁止其跳动，则在程序入口将屏幕刷新设为false，在程序结束是恢复设为true即可，禁止屏幕刷新的另外一个好处是提升程序运算速度。
'****************************************
'---此模块演示了禁用窗体关闭按钮---
'****************************************
'以下声明API函数
#If Win64 Then '64位
'查找窗口
Private Declare PtrS...
excel功能强大， 受到不同层次爱好者青睐。软件工程中，有些没有现成的管理软件，不妨先用excel来担当。在excel中加入
vba
功能，有助于管理的自动化。下面只是在学习应用中的一些提示。
1.office2007中录制宏
由于以前用的都是office2003.同然有2007,找不到以前的菜单在哪了。2007几乎吧所有的东西都制作成了工具面板。要给excel2007录制宏或者添加
vba
脚本，...
