Necessito criar uma sequência de 3 teclas e repetir diversas vezes essa sequência.
Preciso criar uma macro?
As teclas são:
“end”, “delete” e “espaço”
Obrigado
Necessito criar uma sequência de 3 teclas e repetir diversas vezes essa sequência.
Preciso criar uma macro?
As teclas são:
“end”, “delete” e “espaço”
Obrigado
Ola @Sivio, seja bem vindo ao Grupo.
sub EndDeleteEspaço
'----------------------------------------------------------------------
dim document, dispatcher as object
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dispatcher.executeDispatch(document, ".uno:GoToEndOfLine", "", 0, Array())
dispatcher.executeDispatch(document, ".uno:Delete", "", 0, Array())
dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "Text" : args3(0).Value = " "
dispatcher.executeDispatch(document, ".uno:InsertText", "", 0, args3())
end sub
Feito com o gravador de macros ( e tirado gorduras )
ATENÇÂO:: Para dar mais detalhes a sua pergunta, use na pergunta ou abaixo. Não use Adicionar resposta para comentário. Grato.
Caso a resposta atendeu sua necessidade, por gentileza, click na bolinha a esquerda da resposta, para finalizar a pergunta.
Muito obrigado, funcionou.
Agora resta eu criar um botão para execução da macro.