[Hỏi] Cách tương tác với các tùy chọn trong MsgBox (2 người xem)

[bear00]

Hi các bạn, mình mới vọc marco được 1 ít thui. Chủ yếu là tìm hiểu lệnh qua Record Macro.
Mình đang có 1 vấn đề nhờ các bạn trả lời giúp.
Mình có viết 1 đoạn code để save file lại.

Ngaythang = Sheet5.Cells(14, 2)Sheet5.Cells(15, 2) = Ngaythang
Ten = ThisWorkbook.NameLinkfile = ThisWorkbook.PathLinkfilebackup = Linkfile & "\Backup\"Tenbackup = "XCPC2015_" & Ngaythang & ".xlsm"
 Workbooks.Add    ActiveWorkbook.SaveAs Filename:= _        Linkfilebackup & Tenbackup _        , FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

Nếu ko có file trùng tên thì không có vấn đề gì.

Nếu có sẵn 1 file trùng tên thì sẽ hiện lên Msgbox hỏi replace hay ko. Nếu mình chọn Yes thì vẫn ổn, nếu chọn No thì báo lỗi.

Câu hỏi của mình là:
1/ Làm sao để nhấn No ko bị báo lỗi
2/ Thêm code thể nào để nếu hiện Msgbox đó thì mặc định là Yes luôn.

Thanks các bạn

 

[bear00]

ko có ai chỉ hết vậy ???

 

[dovanhoc84]

Bắt đầu sub bạn thêm cái này
Application.DisplayAlerts = False

cuối sub trả nó về true