Run macro only if condition is met.

[eurano]

Hi,
I have following macro wich run 2 macros but I want to check if condition is met before this macro even start. In spreadsheet named "Arkusz1" i have pivot table named "Tabela przestawna 2" wich when its empty macro shouldnt start and show msgbox "there is nothing to send". In addition this pivot table is allways filtered.

Sub RunThemAll()

    Application.Run "vbaAutoRefreshPivot2"
    
    Application.Run "Notes_Email_Excel_Cells"
    
   
End Sub

Picture of pivot below:

 

[eurano]

Hey I made some changes and it finally works as intended, thanks!