Notifications
Clear all

Erro VBA planilha de controle

7 Posts
3 Usuários
0 Reactions
1,332 Visualizações
(@samuelv)
Posts: 0
New Member
Topic starter
 

Olá pessoal,
há algum tempo tive uma grande ajuda aqui.
Hoje venho pedir ajuda novamente. Me parecia ser uma coisa não tão difícil, mas estou apanhando aqui.
Ocorre que criei essa macro e dá um problema quando tento executar. Segue a parte com problema.

Sub SAIDA()
Dim estoque, qtd, linha, total

estoque = Plan1.Range("D10").Value
linha = Plan1.Range("D12").Value
qtd = Plan1.Range("D14").Value

If qtd > estoque Then
MsgBox ("Não há estoque suficiente")
Else
total = estoque - qtd
Plan2.Range("C" & linha).Value = total
MsgBox ("Venda realizada com sucesso")
Plan1.Range("D14").Value = ""
End If

End Sub

Se alguém puder me ajudar ficarei muito contente pq tô com dor de cabeça... :?

Em anexo envio a planilha. Existem outras informações que não precisam ser levadas em consideração dentro da planilha. Me basta que a quantidade que eu colocar em "quantidade saída" desconte da quantidade da planilha "ferramentas".

Obrigado e bom domingo!

 
Postado : 27/09/2015 6:05 am
(@messiasmbm)
Posts: 0
New Member
 

Seu código na planilha ferramentas é automático ?
Tipo 1,2,3,4

 
Postado : 27/09/2015 9:46 am
(@srobles)
Posts: 0
New Member
 

samuelv, boa tarde!

Este erro ocorre porque você referenciou a Plan1 (Cadastro) e não a Plan3 (Saidas). Logo todas as suas variáveis estão vazias gerando o erro. Repare que existem duas macros SAIDA.

Apenas troque na macro que irá utilizar o que é Plan1 para Plan3 e tudo funcionará como esperado.

Abs

 
Postado : 27/09/2015 11:06 am
(@messiasmbm)
Posts: 0
New Member
 

Na planilha de cadastro o código está automático.
Na planilha de saída está funcionando normalmente só que agora não tam o erro que se não tiver o código na célula referente a Descrizione não aparece o erro como era antes olhe na formula...
Testei tudo está sem erros...

 
Postado : 27/09/2015 11:25 am
(@samuelv)
Posts: 0
New Member
Topic starter
 

Muito obrigado Messias. Ficou excelente.
Agora estou tentando fazer o bloqueio de algumas ce'lulas para funcionar como um sistema mesmo fazendo com que cada vez que pressiono TAB va' para a ce'lula seguinte. Mas esta' dando erro quando passa o cadastro para a planilha Ferramentas. Como posso arrumar isso?
Obrigado e um abraco.

(Desculpem os problemas de acentua'cao... Deu pau aqui)

 
Postado : 27/09/2015 12:18 pm
(@messiasmbm)
Posts: 0
New Member
 

Se estava dando erro acho que deve ser por causa de sua versão que tem linhas a menos aqui no meu funcionou normal... já arrumei
Sobre o pulo das células eu resolvi só no cadastro.

 
Postado : 27/09/2015 2:28 pm
(@samuelv)
Posts: 0
New Member
Topic starter
 

Olá Messias.
Obrigado. Estou pouco a pouco mudando nessa planilha que encaminho agora. Assim aprendo um pouco também.
Pra ficar perfeita, do modo que eu queria, só me faltaria que na última planilha chamada "Storico" puxasse os valores cadastrados no momento do registro na planilha Uscite. Inclusive pegando a data e a hora de entrada (Planilha Registro) e fazendo um cálculo pra estabelecer o tempo de vida da ferramenta, que seria inserido coluna dessa última planilha.
Me daria uma mãozinha nisso? De qualquer modo, já te agradeço pela atenção dada antes.
Abraços,
Samuel.

 
Postado : 28/09/2015 1:46 pm