[RESUELTO] Cambiar de hoja con un Botón.

¿Nuevo en Apache OpenOffice? ¿No sabe cómo comenzar o dónde hacer su pregunta? ¡Este es el lugar!
Reglas del Foro
Los moderadores podrían mover los temas creados aquí a un foro más apropiado.
Si usted publicó aquí y no encuentra el tema, puede buscar sus mensajes haciendo clic en la opción «Buscar sus mensajes» que se encuentra justo debajo de la cabecera de la página, junto al panel de control de usuario y al acceso a sus mensajes privados.

[RESUELTO] Cambiar de hoja con un Botón.

Notapor Andres Lote » Mar Jul 10, 2018 7:59 pm

Buenas Tardes, por favor alguien que me pueda colaborar con la siguiente pregunta, quisiera saber si es posible con alguna macro poder cambiar o pasar de hoja al dar click en un boton que diga siguiente y este habilite otra hoja la cual se encuentra oculta y ocultar la anterior? gracias por su colaboracion.

Saludos Andres.
Última edición por Andres Lote el Jue Jul 12, 2018 9:21 pm, editado 1 vez en total
Open office 4.1.3 windows 7 profesional
Andres Lote
 
Mensajes: 15
Registrado: Mié Jul 04, 2018 5:35 pm

Re: Cambiar de hoja con un Boton

Notapor PepeOooSevilla » Mié Jul 11, 2018 8:41 am

Hola.

En el archivo adjunto, FORO_CALC_Boton_Ir_a_hoja_MACRO.ods, puedes ver un ejemplo:

Código: Seleccionar todo   Expandir vistaContraer vista
REM  *****  BASIC  *****
Option Explicit

Sub IrHoja1()
'Hoja1 se convierte en la hoja activa mientras que se oculta la Hoja2
   
   With ThisComponent
      'Hacemos visible Hoja1 para poder activarla
      .getSheets.getByName("Hoja1").isVisible = True
      'Activamos Hoja1
      .getCurrentController.setActiveSheet(.getSheets.getByName("Hoja1"))
      'Y ocultamos "Hoja2"
      .getSheets.getByName("Hoja2").isVisible = False
   End With
End Sub

Sub IrHoja2()
'Hoja2 se convierte en la hoja activa mientras que se oculta la Hoja1
   
   With ThisComponent
      'Hacemos visible Hoja2 para poder activarla
      .getSheets.getByName("Hoja2").isVisible = True
      'Activamos Hoja2
      .getCurrentController.setActiveSheet(.getSheets.getByName("Hoja2"))
      'Y ocultamos "Hoja1"
      .getSheets.getByName("Hoja1").isVisible = False
   End With
End Sub

Ahora bien, para adentrarse en el mundo de las macros para OpenOffice/LibreOffice, lo primero que has de hacer es leer, releer y estudiar el libro de nuestro compañero mauricio Aprendiendo OOo Basic y, también, visitar y estudiar las páginas Manuales de Apache OpenOffice en español: Basic y Basic OpenOffice: Apache OpenOffice Basic en español de nuestro compañero SLV-es.

Las macros son muy poderosas pero también muy frustrantes cuando no te dan el resultado esperado. Por eso te recomiendo primero que estudies los enlaces citados y segundo, que no te canses de hacer pruebas una y otra vez.

Dependiendo de tus necesidades, obviamente, podrías hacer "casi" lo mismo sin necesidad de macros, bien con hiperenlaces o con botones. En el otro archivo adjunto, FORO_CALC_Boton_Ir_a_hoja.ods, puedes ver un ejemplo con botones (Ver > Barra de herramientas: Controles de formulario) sin necesidad de macros. Las pestañas de las hoja las podrías ocultar en "Herramientas > Opciones ... > LibreOffice Calc > Ver". Tendrías que ajustar las propiedades del botón correspondiente como se muestra en la imagen.

Saludos cordiales.
Adjuntos
FORO_CALC_Boton_Ir_a_hoja_MACRO.ods
(18.52 KiB) 20 veces
FORO_CALC_Boton_Ir_a_hoja.ods
(17.11 KiB) 19 veces
FORO_CALC_Propiedades_boton.png
FORO_CALC_Propiedades_boton.png (9.24 KiB) Visto 497 veces
LibreOffice 6.0.7 (estable) en Windows 7 / 10
Por favor, utiliza el Foro para tus consultas, no los mensajes privados
Avatar de Usuario
PepeOooSevilla
 
Mensajes: 924
Registrado: Sab Abr 04, 2009 6:10 pm
Ubicación: Sevilla (España)

Re: Cambiar de hoja con un Boton

Notapor Andres Lote » Jue Jul 12, 2018 9:20 pm

Buenas tardes,

Muchas gracias por su colaboración, fue muy útil la el código que compartiste ya pude terminar con el proyecto que tenia en mente.

Saludos :super: ....
Open office 4.1.3 windows 7 profesional
Andres Lote
 
Mensajes: 15
Registrado: Mié Jul 04, 2018 5:35 pm


Volver a Principiantes

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 73 invitados