Pasar Hojas Con Botones Excel

Como puedo pasarme entre hojas con siguiente y atrás desde un formulario y activar labels dependiendo de la hoja?

1 Respuesta

Respuesta
1

Estas son algunas instrucciones que te servirán:

Ir a hoja anterior:  ActiveSheet.Previous.Select
Ir a hoja siguiente: ActiveSheet.Next.Select

Para cambiar el texto de los Label, la propiedad es Caption:

If ActiveSheet.Name = "Hoja1" Then
    Label1.Caption = "Estoy en Hoja1"
Else
    Label1.Caption = "No estoy en Hoja1"
End If
   

Si vas a comparar muchas hojas podrías utilizar Select en lugar de IF:

Select Case hojia
Case hojita = "Hoja1"
    Label1.Caption = "Estoy en Hoja1"
Case hojita = "Hoja2"
    Label1.Caption = "Estoy en Hoja2"
Case hojita = "Hoja3"
    Label1.Caption = "Estoy en Hoja3"
'otros case
End Select

Podés observar otros ejemplos y macros desde mi sitio.

Sdos

Elsa

¡Gracias! 

No olvides valorar y finalizar si el tema quedó resuelto.

Sdos

Elsa

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas