Actividad pública reciente
Ha valorado "Buena" la respuesta
Seleccionar de una lista e ir a una hoja
Esto: Sub Crearmenu() Dim Hoja As Worksheet On Error Resume Next CommandBars("Menu de hojas").Delete With CommandBars.Add(Name:="Menu de hojas") With .Controls.Add(Type:=msoControlButton) .OnAction = "Abraham" .FaceId = 59 .TooltipText = "Acerca...