Notifications
Clear all

Continuar após condição

10 Posts
4 Usuários
0 Reactions
1,716 Visualizações
(@jonathanpa)
Posts: 8
Active Member
Topic starter
 

Boa Tarde
Sou novo aqui e também em vba, gostaria de saber se alguem pode me ajudar.

call contar_repetidos

if quantidadedepecas.caption <= quantidade.caption then
msgbox ("Essa cor não pode mais ser baixada!")
end if

if codigobarra ="" then
msgbox ("é preciso ler um código")
codigobarra.setfocus
end if

Pois bem, depois desse código ele grava os dados da caixa de texto "codigobarra" na planilha. O meu problema é que eu queria que ele verificasse se o capiton da "quantidadedepecas" é maior do que o caption da "quantidade". Se for maior ele deveria voltar o foco para a caixa de texto codigobarra para que a pessoa digitasse um novo código e se a condição for falsa ele continuaria.

 
Postado : 02/02/2015 11:01 am
(@mussato)
Posts: 11
Active Member
 

Boa tarde Jonathan,

As variáveis quantidadedepecas e quantidade são valores numéricos? Neste caso seria só mudar a extensão delas para .value.

V. Mussato
Office Developer
-------------------
Windows 7 64 bits
Office 2013

 
Postado : 02/02/2015 11:12 am
(@gtsalikis)
Posts: 2373
Noble Member
 

Pela tua descrição, eu entendi o seguinte:

if isempty(codigobarra) then
msgbox ("é preciso ler um código")
codigobarra.setfocus
else
if quantidadedepecas.value <= quantidade.value then
msgbox ("Essa cor não pode mais ser baixada!")
Else
msgbox ("quantidade inválida, insira um novo codigo de barras")
codigobarra.clearcontents
codigobarra.setfocus
end if
End if

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 02/02/2015 11:13 am
(@jonathanpa)
Posts: 8
Active Member
Topic starter
 

obrigado gtsalikis
Ele ve que o quantidadedepecas é maior e aparece a mensagem, mas ele continua para o restante do código, eu queria que ele voltasse para que a pessoa lesse um novo código na caixa de texto codigobarra.

 
Postado : 02/02/2015 11:37 am
(@gtsalikis)
Posts: 2373
Noble Member
 

vc postou só uma parte do código?

Só assim para ele continuar.

nesse caso, para interromper o código, use:

exit sub

Se resolver, por favor,clique na mãozinha e marque o tópico como resolvido.

Se não resolver, poste o modelo da planilha.

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 02/02/2015 11:46 am
(@jonathanpa)
Posts: 8
Active Member
Topic starter
 

Tinha fechado o tópico que abri pela manhã, mas acho que não consegui resolver o problema.
No anexo tem o formulário "baixar peças". Onde eu escolho a distribuidora - a célula e depois leio um código de barra que puxa as informações e gravo como na planilha cod lidos. O que eu queria é que antes de apertar o botão confirmar na userform "baixar peças" ele verificasse quantos regitros iguais ao código de barras existe e se esse número fosse maior do que o número cadastrado em na planilha base, coluna peças ele não deixasse cadastrar e voltasse para que o usuário lesse um novo código de barras.
Desculpe pela extenção e pela repetição de tópico.
Obrigado

 
Postado : 02/02/2015 6:23 pm
(@jonathanpa)
Posts: 8
Active Member
Topic starter
 

Desculpe não tinha lido as regras direito.
Em anexo esta o arquivo cmpactado. Se alguem puder ajudar.

 
Postado : 03/02/2015 5:35 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Já verificou em nossa base? eu mesmo já respondi postagens próxima de usa dúvida.

Att

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

 
Postado : 03/02/2015 7:59 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Não entendi??

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

 
Postado : 03/02/2015 8:14 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

jonathanpa

Uni os teus 2 tópicos, pois não é permitido criar 2 tópicos sobre o mesmo assunto.

Quando você marcar o tópico como Resolvido ele é trancado pela moderação, mas se por algum motivo, for necessário reabrir o tópico, basta mandar uma MP para um dos moderadores.

[]s

Patropi - Moderador

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

 
Postado : 03/02/2015 10:03 am