Macro para Dar Foco em determinada célula

perguntadas 2019-02-11 00:08:45 +0100

imagem do gravatar de Marco Salles

Boa noite

Como dar foco ao fechar uma planilha e retornar ou ir a outra e dar foco em determinado controle ou Celula para posterior edição

Obg

editar alterar tag assinalar como ofensivo fechar mesclar Excluir

Comentários

Você quer que sempre que abrir o arquivo, a mesma célula esteja ativa ?

imagem do gravatar de Gilberto SchiavinattoGilberto Schiavinatto ( 2019-02-11 00:51:37 +0100 )editar

Boa tarde Gilberto . Isso mesmo so que via Macro pois tenho um Macro que direnciona ara determinadas planilhas e dessas retornam . Obg

imagem do gravatar de Marco SallesMarco Salles ( 2019-02-12 16:21:56 +0100 )editar

Se entendi a macro é da planilha onde deve retornar, então na macro direcione para ir a célula que desejar.

Ou melhor poste a macro. edite sua pergunta e acrescente.

imagem do gravatar de Gilberto SchiavinattoGilberto Schiavinatto ( 2019-02-13 18:02:54 +0100 )editar

O que eu queria era ao executar um Macro que retornaria a uma determinada Planilha ( Este Codigo de ir de uma planilha a outra vc mesmo em outra ocasião ja postou ) . Ao retornar para a Planilha Destino uma célula especifica desta Planilha receberia o Foco . Segue o código que aparentemente faz isso . Caso tenha código melhor ou algo a acrescentar por favo não exite

    rem Esta Subseção do Macro Levará o Foco para a CELULA I87
    rem definindo as  variáveis
    dim document   as object
    dim dispatcher as object
    rem --
    rem Acessando o documento
    document   = ThisComponent.CurrentController.Frame
    dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

    rem ---Selecionando a Celula no Meu caso é I87  ---
    dim args1(0) as new com.sun.star.beans.PropertyValue
    args1(0).Name = "ToPoint"
    args1(0).Value = "$I$87"
    dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())
imagem do gravatar de Marco SallesMarco Salles ( 2019-02-16 16:31:10 +0100 )editar

Em sua pergunta "Como dar foco ao fechar uma planilha e retornar ou ir a outra e dar foco em determinado controle ou Célula para posterior edição', quando menciona planilha, é aba ou arquivo ?

imagem do gravatar de Gilberto SchiavinattoGilberto Schiavinatto ( 2019-02-16 17:35:36 +0100 )editar

Obrigado Gilberto

É Aba ( Outra Planilha do mesmo Documento ) .

imagem do gravatar de Marco SallesMarco Salles ( 2019-02-17 11:25:52 +0100 )editar

Vamos ver se entendi: Você esta em uma planilha A, faz alguma coisa, aciona a macro que lhe envia para a planilha B, e feito alguma e quer retornar para a célula que estava na planilha A. É isso ?

.

Poderia ser outra macro ? Pois de qualquer modo, teria que acionar algo para continuar.....

.

Teria como postar um exemplo deste arquivo. ( Edite sua pergunta para anexar ).

.

Contato direto: gilberto@schiavinatto.com e/ou gilbertoschiavinatto@yahoo.com.br

imagem do gravatar de Gilberto SchiavinattoGilberto Schiavinatto ( 2019-02-17 11:39:21 +0100 )editar

@Marco Salles disse:

"Boa noite Gilberto

As Planilhas fazem parte de um mesmo documento

"Você esta em uma planilha A, faz alguma coisa, aciona a macro que lhe envia para a planilha B, e feito alguma e quer retornar para a célula que estava na planilha A. É isso ?"

Da Planilha B gostaria de retornar para a Planilha A ou FOCANDO em uma Célula ou dando FOCO em um Controle

Muito obrigado"

Marcos, Não use resposta para comentar

imagem do gravatar de Gilberto SchiavinattoGilberto Schiavinatto ( 2019-02-19 03:43:20 +0100 )editar

Duas macros uma vai para a Planilha B célula tal

após alteração aciona outra macro que retorna a Planilha A ( vai voltar para a célula que estava ).

imagem do gravatar de Gilberto SchiavinattoGilberto Schiavinatto ( 2019-02-19 03:46:46 +0100 )editar

Boa tarde . Não necessariamente duas Macro . Uma Macro que executa alguma algo e que dependendo da foco em uma determinada Célula de uma determinada Planilha

O Código que eu postei anteriormente funciona , so pegunto se ha como simplificar

rem Esta Subseção do Macro Levará o Foco para a CELULA I87
rem definindo as  variáveis
dim document   as object
dim dispatcher as object
rem --
rem Acessando o documento
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ---Selecionando a Celula no Meu caso é I87  ---
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "ToPoint"
args1(0).Value = "$I$87"
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())
imagem do gravatar de Marco SallesMarco Salles ( 2019-02-20 17:27:34 +0100 )editar