Pergunte aqui
0

Como ocultar diversas colunas

perguntadas 2018-07-19 12:51:22 +0100

esta mensagem está marcada como wiki comunitário

Esta mensagem é um wiki. Qualquer pessoa com karma >75 é bem-vinda para a melhorar.

Gostaria de selecionar todas as colunas a direita a partir da coluna "I" para ocultá-las ou excluí-las

editar alterar tag assinalar como ofensivo fechar mesclar Excluir

1 Resposta

1

respondidas 2018-07-19 13:26:45 +0100

updated 2018-07-19 13:27:51 +0100

Manualmente seria: Clique na letra da coluna, no caso "I", Ctrl+Shift+Seta para esquerda. e clique direito novamente no titulo da das colunas selecionadas e selecione Ocultar.

Para mostrar selecione a planilha inteira (canto superior esquredo) e clique direito e Mostrar colunas

Via Macro seria: Clique na letra da coluna, e acione a macro.

'================================================|
sub OcultarColunasAnteriores
'================================================|
dim document   as object
dim dispatcher as object
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "By"
args1(0).Value = 1
dispatcher.executeDispatch(document, ".uno:GoLeftToStartOfDataSel", "", 0, args1())
dispatcher.executeDispatch(document, ".uno:HideColumn", "", 0, Array())
end Sub

Estando em qualquer célula acione a macro para mostrar todas as colunas,

'======================================================================
sub MostrarColunasOcultasTodas
'======================================================================
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dim args2(0) as new com.sun.star.beans.PropertyValue
args2(0).Name = "ToPoint"
args2(0).Value = "$A:$AMJ"
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args2())
dispatcher.executeDispatch(document, ".uno:ShowColumn", "", 0, Array())
dispatcher.executeDispatch(document, ".uno:GoDown", "", 0, args2())
dispatcher.executeDispatch(document, ".uno:GoUp", "", 0, args2())
end sub
editar assinalar como ofensivo Excluir Link mais
Login/Registrar para responder

Ferramentas de perguntas

1 seguidor

Estatísticas

Perguntadas: 2018-07-19 12:51:22 +0100

Lidas: 20 vezes

Última atualização: Jul 19