Msgbox al cambiar de hoja

Hola, a ver quien puede ayudarme a programar un msgbox al cambiar entre hojas. Eje: Tengo Hoja1, Hoja2, Hoja3, si estoy en Hoja2 y me traslado a Hoja1 entonces un mensaje emerje y me dice: "Estas en la Hoja1", y así con las otras hojas. Gracias desde ya!

1 respuesta

Respuesta
1
Coloca esto en el modulo del libro (ThisWorkBook - Nombre por defecto)
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
MsgBox "Estas en la hoja de nombre " & Sh.Name
End Sub
Abraham
Me funciono excelente mi amigo, pero quiero aprovechar para hacerte una más... Si en lugar de pasar entre hojas, hago visible una hoja oculta, pero no quiero que esta sea de uso publico, ¿cómo hago para impedir su visibilidad...? Gracias de antemano y no pregunto más!
En el editor de VBA, entra a las propiedades de la hoja en cuestión y en Visible coloca "2-xlSheetVeryHidden"
Abraham

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas