Contador de Hoja en Excel 2007

[tate20]

Buenas me gustaria saber si podria poner en una celda el numero de hoja que corresponde a esa hoja,es decir si estoy en la hoja 1 q aparezca en esa celda el numero do2 pero si añado tres paginas mas que la ultima que añado sea la 4 ,la anterior la 3,etc..una especie de contador

[tate20]

Alguien sabe hacer algo asi??

[Monimo]

Pues solo debes escribir en alguna celda de la hoja el numero cuando cambie la hoja activa, el evento q dispara esto se llama Workbook_SheetActivate



Private Sub Workbook_SheetActivate(ByVal sh As Object)
If TypeName(sh) = "Worksheet" Then
sh.Range("a1").Select
sh.Range("A1") = ActiveSheet.Index
End If
End Sub

[tate20]

Gracias es lo que andaba buscando.Por cierto donde puedo encontar mas codigos sobre excel??