¿Cómo agregar la punta del mouse sobre una determinada forma en Excel?
En muchos casos, debe asignar una macro a una determinada forma para ejecutar la macro haciendo clic en ella en su hoja de trabajo. Después de asignar macro a la forma, agregar el mouse sobre la punta puede ayudar a recordar lo que hace la forma en el futuro. Este artículo le muestra dos métodos para agregar el mouse sobre la punta a una determinada forma en Excel.
Agregue el mouse sobre la punta a una forma determinada agregando hipervínculo
Agregue el mouse sobre la punta a una forma determinada con el código VBA
Agregue el mouse sobre la punta a una forma determinada agregando hipervínculo
Puede agregar hipervínculo con información en pantalla a una determinada forma en la hoja de trabajo. Haz lo siguiente.
1. Haga clic derecho en la forma que necesita para agregar el mouse sobre la punta, luego haga clic en hiperenlace desde el menú contextual. Ver captura de pantalla:
2. En el Insertar hipervínculo cuadro de diálogo, haga clic en Sugerencia en pantalla botón. Y en el Establecer información en pantalla de hipervínculo cuadro de diálogo, ingrese el texto de sugerencia en pantalla que necesita mostrar mientras pasa el mouse sobre la forma. Finalmente haga clic en el OK botón. Ver captura de pantalla:
3. Cuando vuelva a la Insertar hipervínculo cuadro de diálogo, haga clic en Bookmark botón. Luego ingrese A1 en el Tipo en el cuadro de referencia de celda del Seleccionar lugar en documento cuadro de diálogo y finalmente haga clic en el OK del botón.
4. Haga clic en el OK botón en el Insertar hipervínculo cuadro de diálogo para finalizar la creación del hipervínculo.
Ahora puede ver la sugerencia de la pantalla que se muestra al pasar el mouse sobre la forma.
Agregue el mouse sobre la punta a una forma determinada con el código VBA
Puede agregar fácilmente el mouse sobre la punta a una forma determinada después de ejecutar el siguiente código VBA.
1. Abra la hoja de trabajo que contiene la forma que mostrará la punta al mover el mouse. Haga clic con el botón derecho en la pestaña de la hoja y luego haga clic en Ver código en el menú contextual.
2. En el Microsoft Visual Basic para aplicaciones ventana, copie el siguiente código VBA en la ventana Código.
Código VBA 1: agregue el mouse sobre la punta a una forma determinada
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updated by Extendoffice 2018/3/30
If Target.Address = Range("A1").Address Then
Call MoveRow
End If
End Sub
3. Hacer clic en recuadro > Módulo. Luego ingrese debajo del código VBA en la ventana del Módulo.
Código VBA 2: agregue el mouse sobre la punta a una forma determinada
Sub Text()
'Updated by Extendoffice 2018/3/30
Dim xShape As Shape
Dim xRg As Range
On Error Resume Next
Application.EnableEvents = False
Set xShape = ActiveSheet.Shapes("Rectangle 4")
If Not xShape Is Nothing Then
ActiveSheet.Hyperlinks.Add xShape, "", "A1", ScreenTip:="Click to run Macro "
End If
If ActiveSheet.Hyperlinks(1).SubAddress = "A1" Then
Call MoveRow
End If
Application.EnableEvents = True
End Sub
Notas:
3. presione el F5 clave para ejecutar el código. Luego, la sugerencia de pantalla especificada se agrega a la forma determinada inmediatamente.
Artículos relacionados:
- ¿Cómo cambiar automáticamente el tamaño de la forma según / dependiente del valor de celda especificado en Excel?
- ¿Cómo rellenar una forma con un color de fondo transparente en Excel?
- ¿Cómo ocultar o mostrar una determinada forma según el valor de celda especificado 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!