Worksheet.Type (Excel)

Returns an XlSheetType value that represents the worksheet type. Possible return values are xlChart - Chart, xlWorksheet - Worksheet.

Dim xstType As XlSheetType
xstType = ActiveSheet.Type