#42 - Course macros and Excel VBA - Activation Button or Toggle Button

Поделиться
HTML-код
  • Опубликовано: 7 ноя 2024

Комментарии • 43

  • @Deivid8525
    @Deivid8525 2 года назад +1

    obrigado pela aula, professor!

    • @AlessandroTrovato
      @AlessandroTrovato  2 года назад

      Eu é que agradeço pela sua audiência Deivid! Boas Festas

  • @marcelopitanga8858
    @marcelopitanga8858 3 года назад +1

    Oi Alessandro,
    Primeiramente parabéns pela aula e muito obrigado pela multiplicação dos de conhecimentos conosco.
    Através dessa aula, eu inventei de testar algumas coisas, e fiz alguns teste com sucesso, porém não tiver sucesso na alteração de imagem , conforme os comandos abaixo, para a propriedade Caption funciona perfeitamente mas como a propriedade Pricture apresenta "Erro de compilação: Tipos incompatíveis"
    Private Sub ToggleButton1_Click()
    If Me.ToggleButton1.Value = True Then
    Me.ToggleButton1.Picture = "C:\Users\f0030834\Desktop\Sistema_Chamados\Cadeado_Fechado.bmp"
    Me.ToggleButton1.Caption = "Desativado"
    Else
    Me.ToggleButton1.Picture = "C:\Users\f0030834\Desktop\Sistema_Chamados\Cadeado_Aberto.bmp"
    Me.ToggleButton1.Caption = "Ativado"
    End If
    End Sub
    Desde já Obrigado.
    Marcelo Pitanga

  • @felipecouto9044
    @felipecouto9044 3 года назад +1

    Não me canso de pensar. Trovado é o cara! Cada aula me surpreende mais com a facilidade que ele tem em ensinar e eu em absorver o conteúdo. Estou estudando mudar de área, curto Python e essa visão da mecânica da programação por trás do VBA tá me ajudando muito a compreende outras linguagens. Sucesso Professor!

    • @AlessandroTrovato
      @AlessandroTrovato  3 года назад +1

      Que mensagem boa de receber Felipe! Acabei de entrar nos comentários e me deparo com seu feedback. Muito obrigado de coração por dispor de um tempo para deixar a mensagem. Espero que as mais de 240 aulas que tenho de vba possam te ajudar! Grande abraço.

  • @waltersouzajunior9345
    @waltersouzajunior9345 3 года назад +3

    Professor, ótimo video. TEM COMO HABILITAR O BOTÃO SOMENTE SE EU PREENCHER DADOS EM UMA BASE ? Ex: Formulario de Cadastro, onde o botao Cadastrar só habilita se houver informação nos campos obrigatorios.

  • @Raphael_Albano
    @Raphael_Albano 8 лет назад +1

    Obrigado pela atenção. Mas eu já consegui. É claro graças aos seus vídeos. Fui olhando alguns vídeos e lendo as linhas de comando. Aí tem um vídeo sei que vc usa esse comando. Aí eu fiz uma macro pra saber a numeração da cor e pronto. Gostei bastante dos seus vídeos. Eu sou analista. Porém me dei melhor em vba. Fazendo programas com o Excel e seus vídeos são de extrema valia para as coisas que eu estou fazendo.

    • @AlessandroTrovato
      @AlessandroTrovato  8 лет назад

      +Raphael Albano Grato pela mensagem e por acompanhar os trabalhos Raphael... VBA realmente é uma linguagem simples e muito poderosa de trabalho. Agora meu foco é B.I. e WEB...
      Bons estudos e sucesso!

  • @henriquerabello8924
    @henriquerabello8924 2 года назад +1

    Uma forma simples é com o operador de negação Not por exemplo:
    Private Sub ToggleButton1_Click()
    ActiveCell.Font.Bold = Not ActiveCell.Font.Bold
    End Sub

    • @AlessandroTrovato
      @AlessandroTrovato  2 года назад

      Perfeito! Muito obrigado Henrique pela sugestão e pelo ensinamento! Muito prática essa técnica!

  • @jr.9388
    @jr.9388 Год назад +1

    Alessandro como manter o Botao Toggle Button no ON (Pressionado) mesmo saindo e quando voltar a cessar o formulario continuar no ON.

    • @AlessandroTrovato
      @AlessandroTrovato  Год назад

      Crie uma planilha de parâmetros e, ao carregar a sua pasta de trabalho, leia o parâmetro para setar se o botão está ativado ou não.
      Funcionará!

  • @k_fuente2022
    @k_fuente2022 3 года назад

    Alessandro, como se programar um toggle button para que assuma TRÊS VALORES a cada click, retornando ao valor inicial após o um click no último valor?
    Explicando: digamos que, numa userform, colocamos um botão de alternância (toggle button). Ao acessarmos a userform, o toggle button já assuma a cor azul. Ao primeiro clique, ele mude para a cor verde, ao segundo click, sua cor alterne para vermelho e, ao terceiro clique, retorne à cor inicial (azul). Havendo novo click, o clico se repete.
    Neste caso, a propriedade triple state do toggle button deverá assumir o valor true?

  • @mattzmello
    @mattzmello 4 года назад

    tenho uma planilha que precisa de 1 upgrades para ficar pronta.
    pode me ajudar?
    as únicas coisas que preciso é somente fazer com que se a caixa de seleção estiver marcada então preencher com o nome pertencente a linha com o numero (54, 32, 86, 10 ja descrito na planilha) automatico em outra planilha, se não manter na mesma planilha e continuar o preenchimento manual..
    a outra que preciso é sobre exibir na mesma caixa de cadastro um numero ja cadastrado,
    quando eu tiver preenchendo a linha (x) então mostrar o numero pertencente a essa linha, sendo esse numero o que eu possa definir sem sequencia de 1, 2, 3, 4, mas sim de forma própria tipo 54, 32, 86, 10 ja descrito na planilha.
    se tiver numero ja descrito na planilha na primeira coluna completa, então continuar o preenchimento na mesma linha e preencher a célula seguinte..
    ao concluir passar para a proximo numero descrito
    formula que uso somente do preenchimento.
    'Verificando a quantidade de linhas usadas na planilha
    cont = Worksheets("BD").UsedRange.Rows.Count + 1
    'Selecionando a planilha a ser usada como banco de dados
    Worksheets("BD").Select
    'Armazenando na planilha os dados inseridos pelo usuário
    Cells(cont, 2) = txt_nome
    Cells(cont, 3) = txt_conexão
    Cells(cont, 6) = txt_titular
    estou tentando fazer mas sempre da erro, ja pesquisei em milhares de locais e nao achei nada sobre isso

  • @Marcelo.deLima
    @Marcelo.deLima 4 года назад

    #maisum

  • @michelcesar85
    @michelcesar85 9 лет назад +1

    Muito bom, estava precisando desse "vbmodeless", Obrigado mais uma vez!

    • @AlessandroTrovato
      @AlessandroTrovato  9 лет назад

      Olá +Platini Cesar ! Obrigado por acompanhar os trabalhos.São dicas como essa que fazem as planilhas ficarem cada vez melhores!

  • @doblokemusic9617
    @doblokemusic9617 2 года назад

    BOA NOITE PROFESSOR.
    GOSTARIA, SE POSSÍVEL FOR, UM CÓDIGO VBA PARA O SEGUINTE.
    EM UMA UMA SEQUENCIA DE 25 TOUGGLE BUTTON. TODOS NUMERADOS DE 01 A 25.
    GOSTARIA DE SELECIONAR 15 DELES E INSERIR EM UMA SEQUENCIA DE CÉLULAS, ATRAVÉS DE UM BOTÃO INSERIR. TEM COMO? DESDE JÁ, AGRADEÇO E PARABÉNS PELAS SUAS EXPLICAÇÕES. FORTE ABRAÇO

  • @gabrielhider6375
    @gabrielhider6375 3 года назад

    Opa, tudo bem? Como posso imprimir uma área/tabela penas selecionando dados DIRETAMENTE de uma segmentação de dados?

  • @clovisroberto6971
    @clovisroberto6971 4 года назад

    Bom dia!
    Como faço para que ao clicar em um botão de comando o cursor, volte para a planilha/célula ativa de forma automática sem eu ter que fazer isso com mouse.

  • @Gustavo-gb4tr
    @Gustavo-gb4tr 6 лет назад +1

    Precisa do End If Para Usar O Else?

    • @AlessandroTrovato
      @AlessandroTrovato  6 лет назад +1

      Sim Gustavo. Se você está utilizando o IF precisa escrevê-lo completo.
      Você pode usar sem o Else: IF condição THEN comandos END IF
      ou IF condição THEN comandos ELSE comandos END IF
      Abraços e bons estudos!

  • @planxlsm
    @planxlsm 4 года назад +2

    7:36 Ativar a planilha ( ActiveSheet.Select ) para usar o comando Selection
    10:28 UserForm. Show vbModeless
    17:00 Exemplo do Uso do Toggle Button ( Botão de Ativação )

  • @Raphael_Albano
    @Raphael_Albano 8 лет назад +1

    Alessandro. Eu consegui. Porém eu não quero que a celular mude a fonte é sim a cor do fundo.
    Exemplo. Eu tenho uma celular onde sua cor é azul. E ao clicar no botão quero que a célula fique com o fundo vermelho. E ao desclicar quero que ela volte para a cor azul. Tem como ?

    • @AlessandroTrovato
      @AlessandroTrovato  8 лет назад

      +Raphael Albano Olá! Utilize o comando activecell.interior.color = rgb(255,0,0) para vermelho e rgb(0,0,255) para o azul. É totalmente possível fazer o que precisa!
      Convido você a conhecer outras aulas que tenho do Excel (+140) e outros temas que totalizam atualmente mais de 280 aulas como esta! Bons estudos e sucesso.
      Algumas playlists do canal:
      Excel Básico (30 aulas): ruclips.net/p/PL7iAT8C5wumoOJ135_2lqQfDhCxkkJvDH
      Funções Excel (+40 aulas): ruclips.net/p/PL7iAT8C5wumqX-bUoZn4dgr2dld1KuBTc
      Desafios Excel (3 vídeos): ruclips.net/p/PL7iAT8C5wumpvdXOLLlRZ3t7SUBiqwNU_
      Macros e VBA(+70 vídeos): ruclips.net/p/PL7iAT8C5wumpfsfVzZRRVfpTS17d6sykT
      Tira Dúvidas (7 vídeos): ruclips.net/p/PL7iAT8C5wumpc2bxIM5TPWmNwTG1bi7KL

  • @Raphael_Albano
    @Raphael_Albano 8 лет назад +1

    Tenho uma dúvida aqui e precisava te passar detalhes da minha dúvida. Vc pode me passar algum e-mail para que eu possa te explicar melhor minha dúvida.

    • @AlessandroTrovato
      @AlessandroTrovato  8 лет назад

      Lamento +Raphael Albano ! Não presto suporte técnico ou consultorias particulares (pagas)... Já contribuo distribuindo as aulas com o maior nível de detalhes possível. Infelizmente meu tempo é muito escasso.
      Publique sua dúvida nos comentários que assim que tiver um tempo ou outro colega que acompanha as aulas puderem ajudaremos...
      Convido você a se inscrever em meu canal de vídeos e a conhecer as outras aulas que tenho de Excel no RUclips.
      Excel Básico (30 aulas): ruclips.net/p/PL7iAT8C5wumoOJ135_2lqQfDhCxkkJvDH
      Funções Excel (+40 aulas): ruclips.net/p/PL7iAT8C5wumqX-bUoZn4dgr2dld1KuBTc
      Desafios Excel (3 vídeos): ruclips.net/p/PL7iAT8C5wumpvdXOLLlRZ3t7SUBiqwNU_
      Macros e VBA(+70 vídeos): ruclips.net/p/PL7iAT8C5wumpfsfVzZRRVfpTS17d6sykT
      Tira Dúvidas (7 vídeos): ruclips.net/p/PL7iAT8C5wumpc2bxIM5TPWmNwTG1bi7KL

  • @estacaocriar-personalize7184
    @estacaocriar-personalize7184 8 лет назад +1

    Olá Alessandro! Muito bom seu trabalho. Adoro sua didática. Mas agora estou precisando de uma dica importante que ainda não achei. Preciso salvar numa planilha dados de um BOTÃO TOGGLE BUTTON. Por exemplo: Um volante virtual da LOTOFÁCIL que estou desenvolvendo onde ao clicar sobre os botões numerados de 01 a 25 (escolhidos pelo cliente) esses serão salvos em linha da planilha. Qual seria o código VBA.? Onde posso encontra-lo ( Algum exemplo).

    • @AlessandroTrovato
      @AlessandroTrovato  8 лет назад +1

      Olá Estação Criar! Nessa mesma aula. Procure pelo evento Click da Toggle Button.
      O código para salvar o valor do Toggle na célula A1: Plan1.Range("A1").Value = Me.Caption
      Bons estudos!

    • @estacaocriar-personalize7184
      @estacaocriar-personalize7184 8 лет назад

      Obrigado Alessandro! Executei sua instrução, porém está salvando o nome do formulário (UserForm1) seu CAPTION, ao invés de salvar o CAPTION do botão, que no caso é uma dezena de 01 a 25, uma para cada botão,no caso da lotofácil.

    • @AlessandroTrovato
      @AlessandroTrovato  8 лет назад

      Estaçao Criar - Personalize
      Tente esse código:
      If ToggleButton1.Value = True Then
      Range("A1").Value = ToggleButton1.Caption
      Else
      Range("A1").Value = ""
      End If

    • @estacaocriar-personalize7184
      @estacaocriar-personalize7184 8 лет назад +1

      Grande Alessandro. Esse é o cara! Deu certinho. Sou novato em VBA, mas estou implementando mais alguns recursos e a coisa vai. Obrigadão! Abraço!

  • @naoadquirase...3281
    @naoadquirase...3281 8 лет назад

    Alessandro, parabéns pelas suas vídeo, muito bem explicado e de boas imagens....Estou montando um form e estou tentando usa o tougglebutton, com função de troca de cores quando ativo e desativado, mas não estou conseguindo... você poderia mostrar alguma aula sobre?Agradeço a atenção

  • @humilitywewantit
    @humilitywewantit 9 лет назад +1

    Parabéns por sua nobre iniciativa de compartilhar seus conhecimentos gratuitamente.
    Estou acompanhando seus vídeos, novidades e canal.
    Forte abraço!
    Que você tenha ainda mais sucesso!

    • @AlessandroTrovato
      @AlessandroTrovato  9 лет назад

      Muito obrigado +MarcosEngCivil pelas suas mensagens! Responderei nessa para agradecer as dezenas de comentários deixados nos vídeos! Sucesso amigo e obrigado por acompanhar os trabalhos...

  • @CarlosAlexandreZucolli
    @CarlosAlexandreZucolli 8 лет назад +1

    Boa tarde Alessandro, obrigado pelos vídeos. Estão me ajudando muito.
    Tenho uma dúvida, se puder me responder...
    Ao usar um formulário, a planilha fica inativa? Daria pra usar o formulário e editar a planilha?
    O que eu preciso fazer é selecionar algumas células e copiá-las para outra planilha, por meio de um botão no formulário.
    É possível?
    Obrigado.

    • @AlessandroTrovato
      @AlessandroTrovato  8 лет назад

      Olá +Carlos Alexandre Zucolli ! É possível fazer isso sim. Nas aulas futuros do projeto vou ensinar como carregar formulários no modo VBMODELESS... Bons estudos!
      Aproveito e convido você a se inscrever em meu canal de vídeos e também participar do II Congresso Nacional de Excel - ConaExcel 2016. Vou ser um dos palestrantes. O congresso será online e totalmente gratuito e vou falar sobre esse tema: Conectando planilhas com o ACCESS via VBA.
      Inscreva-se e garanta a sua vaga: www.conaexcel.com.br

    • @CarlosAlexandreZucolli
      @CarlosAlexandreZucolli 8 лет назад

      +Alessandro Trovato obrigado. já estou inscrito.
      vou pesquisar por este termo.
      abraço

  • @Polacoguaiba
    @Polacoguaiba 8 лет назад +1

    Querido, me deparei com a seguinte situação: existe uma macro em um arquivo de outro setor da Empresa (logo, não posso alterar) que gera uma lista de dados e só é executada por um clique em um botão ou autoforma com macro atribuída. Eu estou programando outra macro em arquivos meus que abre esse arquivo da outra área e preciso que execute essa macro, mas não sei como escrever o código para a minha macro dar esse clique no outro arquivo e executar a outra macro. É possível? Parabéns pelos teus vídeos!

    • @AlessandroTrovato
      @AlessandroTrovato  8 лет назад

      Olá Polacoguaiba! O código para abrir a outra pasta de trabalho você já tem? Se não tiver gravei uma aula sobre o assunto e ela já está disponível. Quanto a chamar a outra macro, experimente chamá-la com a instrução CALL passando o nome da workbook que foi aberta no procedimento anterior!.
      Bons estudos e sucesso!
      Algumas playlists do canal:
      Excel Básico (30 aulas): ruclips.net/user/playlistist=PL7iAT8C5wumoOJ135_2lqQfDhCxkkJvDH -
      Funções Excel (+44 aulas): ruclips.net/p/PL7iAT8C5wumqX-bUoZn4dgr2dld1KuBTc -
      Desafios Excel (3 vídeos): ruclips.net/p/PL7iAT8C5wumpvdXOLLlRZ3t7SUBiqwNU_ -
      Macros e VBA(+70 vídeos): ruclips.net/p/PL7iAT8C5wumpfsfVzZRRVfpTS17d6sykT -
      Tira Dúvidas (7 vídeos): ruclips.net/p/PL7iAT8C5wumpc2bxIM5TPWmNwTG1bi7KL - -
      Excel Avançado (curso completo com certificado, + 9 horas de vídeo) curseduca.com/136-microsoft-excel-2013-avancado/BFED29ED

    • @Polacoguaiba
      @Polacoguaiba 8 лет назад +1

      Já fiz isso...usei CALL e outros comandos para executar macro em arquivos abertos e nada...eu precisava mesmo era de uma macro que só desse o clique pra mim, porque até a autoforma em que está atribuída a macro eu chego...Quando usei o CALL deu o erro 438 em algumas vezes e em outras o erro 1024...mas não sei o que deu errado na sintaxe. De qualquer forma estou de férias agora e resolverei isso na volta. Mas se conseguires algo para fazer o simples clique, agradeço.

  • @leandrosouzapro3339
    @leandrosouzapro3339 5 лет назад

    Ola eu gostaria de vídeo com um userform com botão pra abrir as guias ex guia e uma planilha de estoque outra guia um resumo ai no userform ter cada guia seria legal ocultar as guias

  • @swatj3
    @swatj3 6 лет назад

    Não sei se você reparou mas a soma com o aleatórioentre tá dando erro pois sempre que você aperta o botão os números mudam e o resultado acaba pegando a somatória dos números exatamente anteriores ao momento em que você selecionou o botão hahaha
    Só uma curiosidade ;p