¿Cómo añadir un botón personalizado al menú contextual (clic derecho) en Excel?
Como se muestra en las capturas siguientes, muchas personas suelen añadir sus funciones más utilizadas al menú contextual de Excel para acceder a ellas rápidamente con un solo clic en el futuro. Este artículo explica cómo agregar un botón con código personalizado al menú contextual de Excel.
Añadir un botón personalizado al menú contextual en Excel con código VBA
Añadir un botón personalizado al menú contextual en Excel con código VBA
Supongamos que ha creado un script VBA llamado MyMacro en su libro de Excel y ahora desea agregar esta función al menú contextual para ejecutar el código con solo hacer clic en ella. Siga los pasos que se indican a continuación.
1. Pulse simultáneamente las teclas Alt+F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En la ventana de Microsoft Visual Basic para Aplicaciones, haga doble clic en EsteLibro en el panel izquierdo del Explorador de proyectos. A continuación, copie y pegue el siguiente código VBA en la ventana de EsteLibro (Código).
Código VBA: Añadir un botón personalizado al menú contextual en Excel
Private Sub Workbook_Deactivate()
On Error Resume Next
With Application
.CommandBars("Cell").Controls("MyMacro").Delete
End With
On Error GoTo 0
End Sub
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
Dim cmdBtn As CommandBarButton
On Error Resume Next
With Application
.CommandBars("Cell").Controls("MyMacro").Delete
Set cmdBtn = .CommandBars("Cell").Controls.Add(Temporary:=True)
End With
With cmdBtn
.Caption = "MyMacro"
.Style = msoButtonCaption
.OnAction = "MyMacro"
End With
On Error GoTo 0
End SubNota: En el código, sustituya todas las instancias de “MyMacro” por el nombre de la macro que haya creado en su libro de Excel.
3. Pulse las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic para Aplicaciones.
Ahora ha regresado a la interfaz de Excel. Al hacer clic con el botón derecho en una celda, verá que el nuevo botón con el nombre especificado ya aparece en el menú contextual, tal como se muestra en la siguiente captura. Al seleccionarlo, se ejecutará inmediatamente la macro correspondiente.
Descubra la magia de Excel con KUTOOLS AI
- Ejecución inteligente: Realice operaciones en celdas, analice datos y cree gráficos con comandos sencillos.
- fórmulas personalizadas: Cree fórmulas a medida para optimizar sus flujos de trabajo.
- Programación en VBA: Escriba e implemente código VBA con facilidad.
- Interpretación de fórmulas: Entienda las fórmulas complejas con facilidad.
- Traducción de texto: Rompa las barreras del idioma directamente en sus hojas de cálculo.
Artículos relacionados:
- ¿C ómo insertar una nueva fila en blanco automáticamente mediante un botón de comando en Excel?
- ¿Cómo utilizar un botón de comando para guardar la hoja activa como archivo PDF en Excel?
- ¿Cómo guardar y cerrar el libro de trabajo actual sin que aparezca ninguna solicitud, usando un botón de comando en Excel?
- ¿Cómo actualizar o insertar la fecha y hora actuales con un botón de comando en Excel?
- ¿Cómo deshabilitar un botón en Excel después de hacer clic en él una sola vez?
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active 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 dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos