- Application.DisplayAlerts = False
Workbooks("BOOK1.XLS").Close
Application.DisplayAlerts = True
ยกเลิกการเตือนให้ save changes เมื่อปิดแฟ้ม
- Application.ScreenUpdating = False
....
Application.ScreenUpdating = True
ยกเลิกการปรับภาพที่แสดงการทำงานใดๆให้เห็นบนจอ
- Application.StatusBar = "Please be patient..."
Workbooks.Open filename:="LARGE.XLS"
Application.StatusBar = False
ในระหว่างที่กำลังเปิดแฟ้ม ให้แสดงข้อความให้เห็นบน Status Bar ด้านซ้ายล่างของจอ และเมื่อเปิดแฟ้มเสร็จแล้วให้ลบข้อความออก
รหัสอื่นๆที่เกี่ยวข้องกับสัญญาณเตือน
Online Excel Expert VBA
Hits: 2643