vba中新建文件,关闭文件,锁屏，覆盖同名文件

新建文件：ctrl+n

关闭文件：

ActiveWorkbook.Save

Application.Quit

锁屏：

Application.ScreenUpdating = False

Application.ScreenUpdating = True

覆盖同名文件：

    Application.DisplayAlerts = False
    ActiveWorkbook.SaveAs Filename:= _
    Application.DisplayAlerts = True