.
Minha dúvida é simples.
Já pesquisei aqui e não encontrei.
É possível atribuir um mesmo código no VBAProject para mais de um botão na planilha?
A intenção é não estar repetindo (copiando e colando) no VBAProject o mesmo código
para cada CommandButton?_Click() que eu queira utilizar em diferentes páginas na planilha.
Se for possível, como devo fazer.
Grato pela atenção!
Orlando Souza
PS: Se a resposta foi útil, clique na "mãozinha positiva" ou em "curtir" na fonte de link informada, agradecendo ao colaborador do código/fórmula. Eu já fiz a minha parte! :]
Em principio e possível, porem ser saber o que quer fazer, como onde e quando ........
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
É possível com Botão de Formulário (Botão 1, não CommandButton1 - ActiveX). Se esta for uma solução viável para você:
1. desenhe um Botão de Formulário na planilha, associe o botão criado a uma macro
2. em seguida basta copiar/colar o botão quantas vezes você quiser, na própria ou em outras planilhas, as cópias do botão estarão associadas à macro
Osvaldo
Coloque o código em uma macro e chame-os nos botões com o comando Call. Exemplo:
Tenho uma macro com o código chamado "Executa". Depois basta ir nos botões, no evento click e digitar "Call Executa". Dessa forma voce vai evitar ter que copiar o mesmo código em dois botões.
Abraço!
Se te ajudou, não se esqueça de dar um like na resposta e marcar o tópico como finalizado.
Abraços!
Leandro Cordeiro
Se for "CommandButton" do tipo ActiveX pode-se utilizar o "WithEvents" e definir o que pretende em uma unica rotina para todos, mas como o Reinaldo já comentou, precisa ver o que realmente tem em mente.
Segue um modelinho básico:
WithEvents CommandButton_Click
Fonte: https://stackoverflow.com/questions/466 ... -code?rq=1
[]s
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
.
Em principio e possível, porem ser saber o que quer fazer, como onde e quando ........
(...) como o Reinaldo já comentou, precisa ver o que realmente tem em mente. (...)
Olá, pessoal!
Segue um código-exemplo repetido para os três botões:
Private Sub CommandButton11_Click()
' Imprimir somente a seleção atual
ActiveWindow.RangeSelection.PrintOut
End Sub
Private Sub CommandButton12_Click()
' Imprimir somente a seleção atual
ActiveWindow.RangeSelection.PrintOut
End Sub
Private Sub CommandButton13_Click()
' Imprimir somente a seleção atual
ActiveWindow.RangeSelection.PrintOut
End Sub
Bem como a sua imagem no editor do VBAProject:
Alguém pode até perguntar, por que não usar o recurso "Congelar Linha Superior" disponível no Excel, e inserir um botão nas linhas fixas.
Mas o que pretendo é inserir, após cada 5 páginas, botões no lado direito de uma tabela, usando o mesmo código em cada um deles, sem estar
repetindo esse código no VBAProject.
Vou estudar as sugestões respondidas neste tópico.
abçs.
PS: Se a resposta foi útil, clique na "mãozinha positiva" ou em "curtir" na fonte de link informada, agradecendo ao colaborador do código/fórmula. Eu já fiz a minha parte! :]
É possível com Botão de Formulário (Botão 1, não CommandButton1 - ActiveX). Se esta for uma solução viável para você:
1. desenhe um Botão de Formulário na planilha, associe o botão criado a uma macro
2. em seguida basta copiar/colar o botão quantas vezes você quiser, na própria ou em outras planilhas, as cópias do botão estarão associadas à macro
Deu certo!! Muito obrigado!
Agradeço tb a atenção de todos!!
PS: Se a resposta foi útil, clique na "mãozinha positiva" ou em "curtir" na fonte de link informada, agradecendo ao colaborador do código/fórmula. Eu já fiz a minha parte! :]
Marque como resolvido