Vídeo recomendado
https://youtu.be/diWPPPhW-9E

msgbox com soma de caixa de seleção

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Roswell_1416
Acabou de chegar
Acabou de chegar
Mensagens: 1
Registrado em: Qui Jun 29, 2017 5:26 pm

msgbox com soma de caixa de seleção

Mensagem por Roswell_1416 »

Boa Tarde Pessoal

Tudo bem?

Sou novo no canal e preciso muito de uma ajuda em uma planilha aqui no trabalho.

A dúvida é a seguinte, na planilha eu uso caixa de seleção para selecionar quais colaboradores vão estar naquele determinado setor. Eu planejei colocar 5 colaboradores naquele setor, porém, gostaria de acrescentar uma msgbox caso eu acabe selecionando 6 cxs de seleção. Algo do tipo: "Quantidade selecionada acima da quantidade planejada!".

Não sei como fazer isso VBA, tentei o código abaixo, porém não funciona:

Sub If1()
If Range("WYM1048549").Value > Range("WYM1048550").Value Then
MsgBox "Quantidade de Colaboradores Maior que o Planejado", vbCritical, "Planejamento Errado"
End If

End Sub

Vocês poderiam me ajudar?

Abs.


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Rafael Monteiro
Consultor
Consultor
Mensagens: 277
Registrado em: Seg Nov 28, 2011 8:27 am
Localização: Sorocaba - SP
Contato:

Re: msgbox com soma de caixa de seleção

Mensagem por Rafael Monteiro »

Roswell,

Vc precisa ter uma base para a condição. (IF)

Ter uma célula que conte quantas caixas de texto que foi selecionado.

Então vc precisa apenas colocar a condição. Exemplo. Digamos que vc colocou a base de contagem de selecão de caixa na célula A1, o código ficaria assim:

Código: Selecionar todos

 if range ("a1") > 5 then msgbox "Quantidade de Colaboradores Maior que o Planejado", vbCritical, "Planejamento Errado"


Responder