Botão para excluir dados de uma célula

[Tyrone]

Boa noite a todos do grupo,
Alguém sabe dizer como crio um botão para deletar conteúdo de uma célula específica?

Exemplo: Quero que toda vez que eu aperte o botão “Limpar”, delete o conteudo da célula “B7”.

Desde já agradeço a todos.

[schiavinatto]

Um exemplo de macro: feito pelo gravador, apagar dados da célula selecionada

sub Deletar
dim document, 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 = "ToPoint"
args1(0).Value = "Plan1.B7"                                '<==== altere aqui.
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dispatcher.executeDispatch(document, ".uno:ClearContents", "", 0, Array())
end sub

E para criar o botão, siga os passos abaixo:

Na Barra de ferramentas: Controles de formulário, clique em Botão de pressão e desenhe na planilha

Selecione Controle

Eventos / Executar ação

Atribuir Macro

Selecione a macro, OK

Desabilitar o Modo design

---

ATENÇÂO:: Caso queira dar mais detalhes a sua pergunta, use na pergunta ou abaixo. Grato.

Caso a resposta atendeu sua necessidade, por gentileza, click na bolinha a esquerda da resposta, para finalizar a pergunta.

[Tyrone]

Bom dia Gilberto, tudo bem com você?
Primeiramente gostaria de parabenizar pelo belo conteúdo explicativo. Mas o que eu preciso, é deletar de uma célula específica.
Alterei minha pergunta incluindo um exemplo.
Desde já agradeço, muito a ajuda.

[schiavinatto]

@Tyrone, Macro alterada.

[schiavinatto]

@Tyrone respondeu: “Muitíssimo obrigado Gilberto, Deu certinho para o que eu precisava.”