Code loại bỏ thông báo khi Update Pivotable

[Phương Phương mito]

Dear Anh chị của GPE,
Em có làm một File phân tích số liệu. Em dùng Pivotable để làm báo cáo (Từ một nguồn số liệu), báo cáo sẽ tự động RefreshALL số liệu khi mình đổ số liệu vào Sheet Data. Nhưng cứ mỗi lần em đổ vào nó đều hiện thông báo này, em cứ phải Yes liên tục nhiều lần nó mới cho Update số liệu báo cáo. Có đoạn Code gì để loại cái thông báo này đi ạ.

Thông báo là: There is already data in [Phan tich bao cao.xlsm] File.Do you want to replace it ?

 

[leonguyenz]

Dear Anh chị của GPE,
Em có làm một File phân tích số liệu. Em dùng Pivotable để làm báo cáo (Từ một nguồn số liệu), báo cáo sẽ tự động RefreshALL số liệu khi mình đổ số liệu vào Sheet Data. Nhưng cứ mỗi lần em đổ vào nó đều hiện thông báo này, em cứ phải Yes liên tục nhiều lần nó mới cho Update số liệu báo cáo. Có đoạn Code gì để loại cái thông báo này đi ạ.

Thông báo là: There is already data in [Phan tich bao cao.xlsm] File.Do you want to replace it ?

Nên để thông báo, khi có thông báo "Do you want to replace it" nghĩa là bảng Pivot tràn ra đến vùng chứa dữ liệu, nếu bạn bỏ qua thông báo trong code thì dữ liệu đó sẽ mất do Pivot ghi đè lên.
Bạn thử đặt dòng này vào trong code

Sub TenSub()
Application.DisplayAlerts = False
'Code của bạn
Application.DisplayAlerts = True
End sub

 

[Phương Phương mito]

Nên để thông báo, khi có thông báo "Do you want to replace it" nghĩa là bảng Pivot tràn ra đến vùng chứa dữ liệu, nếu bạn bỏ qua thông báo trong code thì dữ liệu đó sẽ mất do Pivot ghi đè lên.
Bạn thử đặt dòng này vào trong code

Sub TenSub()
Application.DisplayAlerts = False
'Code của bạn
Application.DisplayAlerts = True
End sub

Em cảm ơn anh nhiều ạ !