Visual Basic - visual y excel ayuda porfavor

Hola amigos me gustaria saber como le hago para hacer un conteo de hojas de calculo de excel. Esto para saber cuantas hojas tengo en una hoja de calculo vaya la redundancia.

Me serviria muchisimo si me dijeran alguna página que tenga información acerca de visual con excel para manipularlo atraves de visual.

Gracias. Dios los bendiga.

dim appExcel as Excel.Application
dim tothojas as long
Set AppExcel.=new Excel.application

AppExcel.Workbooks.Add
tothojas = AppExcel.Sheets.Count

Saludos
Gustavo