Application.Sheets (Excel)
Retorna uma coleção Sheets que representa todas as planilhas na pasta de trabalho ativa. Objeto Sheets somente leitura.
O uso desta propriedade sem um qualificador de objeto equivale a usar ActiveWorkbook.Sheets.
Dim shtsSheets As Sheets
Set shtsSheets = Sheets