¿Cómo abrir un cuadro de mensaje al activar / abrir una hoja de trabajo específica en Excel?
Es posible que necesite un cuadro de mensaje emergente para recordarle los detalles de una hoja de trabajo cuando la active en Excel. Pruebe el método siguiente.
Aparece un cuadro de mensaje al activar una hoja de trabajo específica con código VBA
Aparece un cuadro de mensaje al activar una hoja de trabajo específica con código VBA
El siguiente código de VBA puede ayudarlo a mostrar un cuadro de mensaje emergente al activar una hoja de trabajo específica.
1. Prensa otro + F11 teclas simultáneamente para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. En la ventana de Microsoft Visual Basic para Aplicaciones, haga doble clic en ThisWorkbook existentes Proyecto panel para abrir el ThisWorkbook (Código) ventana. Y luego copie y pegue el siguiente código VBA en la ventana de código.
Código de VBA: cuadro de mensaje emergente al activar una hoja de trabajo específica
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
On Error Resume Next
If Sh.Name = "Sheet1" Then
MsgBox "Please remember to fill in the daily sale", vbInformation, "Kutools for Excel"
End If
End Sub
Note: En el código, reemplace Sheet1 con el nombre de hoja especificado. Y reemplace el contenido del cuadro de mensaje "Recuerde completar la venta diaria" con el contenido que necesita.
3. Prensa otro + Q teclas simultáneamente para cerrar el Microsoft Visual Basic para aplicaciones ventana.
A partir de ahora, al activar o abrir esta hoja de trabajo, siempre aparecerá un cuadro de mensaje como se muestra a continuación.
Artículos relacionados:
- ¿Cómo crear un temporizador de cuadro de mensaje para cerrar automáticamente el cuadro de mensaje después de cierto tiempo en Excel?
- ¿Cómo abrir un cuadro de mensaje al hacer clic en una celda determinada en Excel?
- ¿Cómo copiar texto del cuadro de mensaje en Excel?
- ¿Cómo abrir un cuadro de mensaje para mostrar el rango de celdas o valores de celda en Excel?
- ¿Cómo abrir el cuadro de mensaje si el valor de la celda cambia dentro de un rango en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!