sub tt()Application.ScreenUpdating=falseApplication.DisplayAlerts=falseworkSheets(3).copyset wb=activeworkbookwb.saveas "D:\abc.csv",xlcsvwb.close 0Application.ScreenUpdating=trueApplication.DisplayAlerts=trueend sub
触发条件呢?什么时候运行?