CommandButton.Capti...
 
Notifications
Clear all

CommandButton.Caption

6 Posts
1 Usuários
0 Reactions
1,732 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Olá a todos!
Tô com uma duvida um pouco incomum:
Preciso que um comando que grave o Caption do CommandButton acionado para usar na rotina.
Segue um modelo em que tentei o uso do caption.
Mas na aplicação tenho muito botoes e tambem quero usar o Caption para outras funções como por exemplo definir Caption de Labels.
Em fim Preciso que um comando que grave o Caption do CommandButton acionado para usar em uma rotina.

Cara o fim de Semana vuou... :cry: :cry: :cry:

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 10/07/2011 2:15 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Anderson, não entendi direito a finalidade: "Em fim Preciso que um comando que grave o Caption do CommandButton acionado para usar em uma rotina.", mas se quer somente captar o Caption, é só definir e declarar as variaveis para cada CommandButton, exemplo :

Para o CommandButton : -
Private Sub CBCu_Click()
Defina a variavel antes do Do While
sCBCu = CBCu.Caption
...........
......................
............................
End Sub

E abaixo de :
Option Explicit
Adicione
Public sCBCu

Assim a Variavel ficará na memoria quando clicar neste Botão, crie umavariavel para cada Botão.

Para fazer os testes, adicione em outras rotinas a insttrução :
Private Sub CBFe_Click()
MsgBox sCBCu

Se utilizou o Private Sub CBCu_Click(), a mensagem exibirá o Caption.

espero que seja isso que preciisa.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 10/07/2011 5:39 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Mauro BLZ?
Olá só
Devo ter pelo menos uns 50 botões nessa aplicação e não queria ter que programar cada um deles.
No exemplo que postei uso um comando mas derepente tem um comando tipo ThisCommandButton.Caption (Só pra constar tentei esse comando e deu erro) e ai só copio o comando e colo nos eventos do CommandButton_Clic()
de cada botão.
é só um meio de diminuir serviço mesmo :D
BLZ?
T+

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 10/07/2011 5:52 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Anderson, desculpe a demora, estava em outra situação.

Não sei se entendi direito, de uma olhada no anexo, é criado um Array dos CommandButtons utilizando-se somente uma rotina para captar qual o Botão e Caption dos mesmos, com isso reduzimos as rotinas e para as Ações dos Botões você pode criar uma Function, já que as açõps são praticamente as mesmas.

Fonte:
http://j-walk.com/ss/excel/tips/tip44.htm

Qualquer coisa retorne.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 10/07/2011 8:01 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Mauro, BLZ?
É isso mesmo.
Vou ter um pouco de dificudade de entender os codigos mas nada demais.
Conceitos nvos sabe.
Cara preciso aprender ingles... :oops:
Leio um pouco devido ao meu trabalho, mas é tecnico, porem especifico...
Preciso melhorar urgentemente...

Muito obrigado!!!

Estou evoluindo bastante com a ajuda de vcs. :lol:

T+

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 11/07/2011 4:57 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Como faço para restringir este Array para uma aba de um multiPage?

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 19/07/2011 10:45 am