Sub MySheetCount() Dim myCount As Long myCount = Application.Sheets.Count MsgBox myCount End Sub
Enter your e-mail below and get notified on the latest blog posts.
VBA Outlook KPI Excel Alt+F11 Dashboards Macros Recording Graphs Automation Developer WaterFall Powerpoint Charts Pivot Tables Forecast Charts