Consigo criar botões para navegar entre as abas no calc?

VitorNicollas · June 19, 2020, 5:30pm

Minha duvida é pra deixar o calc mais visual e facil de nevegar. Como o hiperlink do excel
Queria criar botões para navegar entre as abas. Como no exemplo abaixo.

Eu clico no botão e ja vai pra janela que eu quero, sem ter que clicar nas abas em baixo da tela.

Conras · June 19, 2020, 5:54pm

@VitorNicollas

Siga o caminho

Botão Direito na forma / Editar Hyperlink

Clique no Menu Esquerdo = Documento

Em Destino do Documento, clique no botão à direita da caixa de texto

No Novo Quadro que abrir, Clique no + e selecione a planilha correspondente à forma desejada, em seguida “Aplicar”

Obs.: Funciona apenas quando o Ctrl está sendo pressionado.

VitorNicollas · June 19, 2020, 6:33pm

Mas nesse caso vai abrir um outra planilha?

schiavinatto · June 19, 2020, 8:01pm

Ola @VitorNicollas, pode ser por macros também:

Para cada Planilha esta macro modelo:

Sub IrParaPrincipalSeções
     GoToCel "PRINCIPAL>SEÇÕES"
End Sub

E esta é uma SubMacro Padão:

Sub GoToCel ( xLocal$ ) 
'------------------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue : args1(0).Name = "ToPoint" : args1(0).Value = xLocal
CreateUnoService("com.sun.star.frame.DispatchHelper") _
.executeDispatch(ThisComponent.CurrentController.Frame, ".uno:GoToCell", "", 0, args1())
End Sub

schiavinatto · June 19, 2020, 8:04pm

@VitorNicollas, já que quer navegar por Botões, deixe só a planilha, veja este exemplo do Escritório Aberto: https://wiki.documentfoundation.org/images/3/39/ModeloArquivoCalc1.ods

VitorNicollas · June 19, 2020, 8:09pm

Isso ai que queria fazer no meu. Como faz?? Quero aprender. O senhor tinha que fazer um canal no Youtube auhsauh s

schiavinatto · June 19, 2020, 11:39pm

Vá na aba Inicial e clique no Lápis para voltar ao normal, de uma olhada nas macros.

Se desejar mais detalhes entre em contato direto, veja aqui: https://wiki.documentfoundation.org/User:Schiavinatto

Conras · June 22, 2020, 11:08am

@VitorNicollas, pode fazer assim também:

Sub SelecionaNomedaSuaPlanilha
	
	Dim oDoc as Object, oSheet as Object, oDocView as Object, oPlanSelect as Object
	
		oDoc = ThisComponent
		oSheet = oDoc.Sheets
		oDocView = oDoc.getCurrentController()
		
			oPlanSelect = oSheet.getByName("NomedaSuaPlanilha")
			
			oDocView.setActiveSheet(oPlanSelect)	

End Sub

Obs.: Importante ressaltar que é de boa prática “baixar” a segurança de macros. E caso sua planilha for aberta em outras máquinas, deve ser feita a mesma configuração.

Motivo: Caso a “Segurança de Macros” esteja no default (Alta), sempre que abrir a planilha, ela indicará que contém macros e fará o bloqueio da execução da mesma.texto em negrito