Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Como rodar o código...
 
Notifications
Clear all

Como rodar o código de forma automática?

 
2024 - VBA & Macros
Post Recente por Trindade 8 anos atrás
9 Posts
2 Usuários
0 Reactions
1,497 Visualizações
RSS
 Fabiano
(@alanisfcsm)
Posts: 0
New Member
Topic starter
 

Bom dia!
Como rodar o código de forma automática?

Sub check_box_observacoes_deposito()

  Dim ws As Worksheet
  Set ws = Worksheets("A")

'Checkbox values are 0 (false), 1 (true), 2 (changed or grey)
    If ws.CheckBoxes("Check Box 84").Value = 1 Then
        MsgBox ("Yay")
        Else: MsgBox ("Aww")
    End If

End Sub
 
Postado : 21/09/2016 6:11 am
 Trindade
(@trindade)
Posts: 0
New Member
 

Bom dia, alanisfcsm.

Quando diz automático, seria ao abrir o arquivo? ao realizar alguma ação no arquivo?
Disponibiliza um arquivo de exemplo, fica mais fácil o entendimento ...

 
Postado : 21/09/2016 6:29 am
 Fabiano
(@alanisfcsm)
Posts: 0
New Member
Topic starter
 

Toda vez que clicar.

Teria como fazer o mesmo com os botoes de opção?

:oops:

 
Postado : 21/09/2016 6:43 am
 Trindade
(@trindade)
Posts: 0
New Member
 

Como colocou pouco controle seria mais ou menos assim ...

Quanto a upload depois de uma olhada no tópico http://www.planilhando.com.br/forum/viewtopic.php?f=7&t=203

 
Postado : 21/09/2016 6:58 am
 Fabiano
(@alanisfcsm)
Posts: 0
New Member
Topic starter
 

E quase isso!
Eu tenho várias caixas de seleção e botões de opção na mesma planilha, gostaria de definir quais devem ser consideradas.
Na pressa não expliquei corretamente.
Desculpe pelo upload não ter sido em zip.
:oops:

 
Postado : 21/09/2016 7:05 am
 Trindade
(@trindade)
Posts: 0
New Member
 

Basta adicionar ação para os controles que deseja.

 
Postado : 21/09/2016 8:07 am
 Trindade
(@trindade)
Posts: 0
New Member
 

Depois de sua ação montada

Adicionar e/ou Remover
1. Clique com o botão direito do mouse sobre o controle que deseja inserir/remover ação
2. Atribuir Macro
3. Em Nome da Macro, selecione uma das macros listadas abaixo ou simplesmente limpe o campo.

Conforme imagem abaixo

No arquivo anexo o "Botão de opção 5" esta sem ação, ao clica nele pode notar que nada ira acontecer, nos demais esta chamando a ação com o Msgbox.

 
Postado : 21/09/2016 8:19 am
 Fabiano
(@alanisfcsm)
Posts: 0
New Member
Topic starter
 

Cara! explica ai. Como que com apenas esse código ele sabe que eu cliquei na check box?
Funcionou, mas quero entender támbem..

Sub Mensagem()

    MsgBox "Deu certo clicar no controle, executou..."

End Sub
 
Postado : 21/09/2016 10:42 am
 Trindade
(@trindade)
Posts: 0
New Member
 

:D

Fácil ...
A mesma macro esta associado aos seus controle, na imagem que mandei pra ti você pode associar a mesma macro para um ou mais controles.
No seu caso a macro não vai mudar sempre será a mesma, e conforme os checkbox ou optionbutton selecionado vai alterando os valores mas dentro da mesma macro.

 
Postado : 21/09/2016 2:57 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico