Suppress message PAx

[TimeTq]

Hi, does anyone know, how to suppress/hide message "Working..." after rebuild an exploration by macros?

Reporting.Explorations.GetAt(ExplorationSheet).SetSpecification Sheets(FaceSheet).Range("A1")