completar comando em macro mesclar e centralizar e fechar janela de estilos e formatação
Olá pessoal! Estou com uma planilha com algumas macros gravadas e acionadas por botões. No final de cada uma delas surge as janelas:
O que devo acrescentar nessas linhas de códigos para sempre marcar como Não, sem precisar fazer isso manualmente:
rem Mesclar e centralizar
dim args6(0) as new com.sun.star.beans.PropertyValue
args6(0).Name = "MoveContents"
args6(0).Value = true
dispatcher.executeDispatch(document, ".uno:ToggleMergeCells", "", 0, args6())
Em outra surge:
rem Sair da caixa de estilo
dim args11(0) as new com.sun.star.beans.PropertyValue
args11(0).Name = "DesignerDialog"
args11(0).Value = false
dispatcher.executeDispatch(document, ".uno:DesignerDialog", "", 0, args11())
Com ref. a pergunta 1: A pergunta "Deseja mover ......." só é feita se há dados em mais que uma célula, por exemplo células A1:A2 quando agrupar se houver dados em ambas ou só em A2, será feita a pergunta; se agrupar é só houver dados na célula inicial da área (a1) não sera feita a pergunta. Obs: célula sem dados, é informação deletada e não digitada "espaço". Obs2: quando responde não as informações, as células/dados estão preservadas abaixo da agrupada.
Apenas uma célula contém informação, sendo ela a primeira da sequência, mesmo assim me retorna a pergunta; somente quando a célula abaixo está vazia é que não exibi a pergunta. Com isso, tive que acrescentar um código para que inserisse uma célula abaixo delas antes de mesclar e outro para excluí-la depois de ter mesclado. Daí não exibi mais a primeira janela de pergunta.
Ola @Leandro Vieira, só para atualização: O problema da célula abaixo ter informação foi resolvido, mesmo tendo, a pergunta não é feita. (Teste em LibO 6.2.2.1)
Ótima informação @Gilberto Schiavinatto!