Numero de hojas del fichero

[coketiano]

me está sacando de quicio q no encuentro ni en google ni por aquí cómo puede saber mi macro cuántas hojas tiene y cómo pasar de una a la siguiente así q al final a crear nuevo tema y preguntar ...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Macro Antonio]

Hola:

Nº de hojas:

Sheets.Count

Para pasar a una hoja:

Sheets("Nombre de la hoja").Activate

Salu2. Antoni

 

[coketiano]

ey, muchas gracias, para ira a una en concreto ya sabía como es, pero lo que quiero es pasar a la hoja siguiente; a la q estaría a su derecha

 

[Macro Antonio]

A ver, prueba esto:

Sub HojaDerecha()
x = 1
While Sheets(x).Name <> ActiveSheet.Name: x = x + 1: Wend
If Sheets.Count = x Then x = 0
Sheets(x + 1).Activate
End Sub

Salu2. Antoni.

 

[coketiano]

joder, eres un crack!!!
muchas gracias :D