BOX lựa chọn chạy Macro nếu thỏa điều kiện

 

CarryOn = MsgBox("Do you want to run this macro?", vbYesNo, "Warning") 

If CarryOn = vbYes Then 

'bỏ phần code còn lại vào đây

End If