Página 1 de 1

Inserir Texto em Célula especifica a partir de um botão

Enviado: 03 Mar 2022 às 14:05
por joaopauloag89
Olá, tenho uma planilha de votação onde ao clicar no botão quero que fique visivel para o usuario a mesma informação que ele acabou de clicar, porque quero isso, pois seria que iria alimentar meu banco invés do botão a partir do momento que confirmou voto como a imagem abaixo:

Imagem

No caso seria, no momento que usuário clicar em um dos botões de aprovar e reprovar e que o VBA inserisse o texto na celular B13 "Aprovado" ou "Reprovado"

Re: Inserir Texto em Célula especifica a partir de um botão

Enviado: 03 Mar 2022 às 17:43
por osvaldomp
Experimente:
Código: Selecionar todos
Sub Votar()
 [D13] = ActiveSheet.Shapes(Application.Caller).Name
End Sub
#
1. altere os nomes das figuras para "Aprovado" e "Reprovado".
2. vincule as duas figuras ao código acima.