Copy sheet không cảnh báo vba
Để sao chép một sheet mà không có cảnh báo VBA, bạn có thể sử dụng đoạn mã sau:
```vba
Sub CopySheetWithoutAlert()
Application.DisplayAlerts = False
Sheets("Sheet1").Copy After:=Sheets(Sheets.Count)
Application.DisplayAlerts = True
End Sub
```
Trong đoạn mã trên, Sheets("Sheet1") là sheet bạn muốn sao chép. Để sao chép sheet mà không có cảnh báo, chúng ta tắt cảnh báo bằng cách đặt `Application.DisplayAlerts = False`, sau đó sao chép sheet và cuối cùng bật lại cảnh báo bằng cách đặt `Application.DisplayAlerts = True`.