Hola,
estoy creando una hoja de cálculo con varios botones de comando, en cada uno de ellos se llama a una macro que visualiza una determinada hoja. El procedimiento que se ejecuta con cada botón, es siempre igual, tan sólo cambia el nombre de la hoja a visualizar.
Me gustaría optimizar el diseño con el envío del nombre de la hoja correspondiente desde el propio botón.
El procedimiento llamado sería el siguiente:
Sub Hoja(Nombre As String)
Dim oHoja As Object
oHoja = ThisComponent.getSheets.getByName(Nombre)
oHoja.isVisible = Not oHoja.isVisible
ThisComponent.getCurrentController.setActiveSheet(oHoja)
End Sub
Muchas gracias.