Workbook.FileFormat (Excel)
Retorna o formato de arquivo e/ou o tipo da pasta de trabalho. Somente leitura XlFileFormat. Aqui você pode encontrar os valores possíveis para
Algumas destas constantes podem não estar disponíveis para você, dependendo do suporte a idioma (português do Brasil, por exemplo) que você selecionou ou instalou.
Dim xffFileFormat As XlFileFormat
xffFileFormat = ActiveWorkbook.FileFormat