Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
ATUALIZAR CUSTO MÉD...
 
Notifications
Clear all

ATUALIZAR CUSTO MÉDIO VIA COMBOBOX

 
2024 - VBA & Macros
Post Recente por danieldias 9 anos atrás
10 Posts
4 Usuários
0 Reactions
1,417 Visualizações
RSS
 danieldias
(@danieldias)
Posts: 21
Eminent Member
Topic starter
 

Olá pessol!

Vcs poderiam me ajudar a resolver o problema do projeto anexo?
O que quero é o seguinte:
Que ao clicar no botão de comando "ATUALIZAR" ele faça o comando para planilhas de qualquer nome e não apenas com a palavra "Produto" no nome, ou seja, que ele reconheça o arquivo "DOCE DE LEITE" e não apenas com a nomenclatura "Produto1" como está fazendo agora.
Já tentei por algumas variáveis novas e alterar as que estão mas dá erro.

Obrigado mais uma vaz a todos!

 
Postado : 04/05/2016 7:54 am
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

danieldias

Boa tarde!

Não vi nenhum ComboBox em seu formulário. em uma das linhas do seu módulo você fala nesse combobox.

    Arq = ComboBox1.Value

Onde está esse ComboBox1?

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 04/05/2016 11:04 am
 danieldias
(@danieldias)
Posts: 21
Eminent Member
Topic starter
 

É exatamente isto. Vc pode inserir e fazer o código funcionar para ele tb?

 
Postado : 04/05/2016 11:23 am
 MPrudencio
(@mprudencio)
Posts: 2749
Famed Member
 

SE o topico nao foi solucionado pq marcou como resolvido???

viewtopic.php?f=10&t=20200&p=102170#p102170

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 04/05/2016 2:06 pm
 danieldias
(@danieldias)
Posts: 21
Eminent Member
Topic starter
 

Vc pode me ajudar neste tópico Marcelo?
O outro já está desmarcado.

 
Postado : 04/05/2016 4:40 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Daniel, fiquei em duvida.

O que quer que seja carregado no Combobox ?

A rotina faz um loop pelos valores em "A2:A4" que correspondem aos nomes dos Arquivos e pega o valor na Celula "N3" e insere na coluna B na linha correspondente.

Você quer que a rotina só funcione quando selecionar um nome no combobox e não tenha mais o loop ?

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

 
Postado : 04/05/2016 7:08 pm
 danieldias
(@danieldias)
Posts: 21
Eminent Member
Topic starter
 

Quero manter o loop.
eu testei mas não funciona com arquivos com nome tipo "Chocolate". Veja se você consegue concertar o código.
Obrigado!

 
Postado : 04/05/2016 7:21 pm
 danieldias
(@danieldias)
Posts: 21
Eminent Member
Topic starter
 

Segue anexo com a pasta "Produtos" que estou usando com os nomes corretos.
Eu preciso que o botão atualizar busque cada um dos custos médios e salve em "Backup".
O código não está reconhecendo os nomes.

 
Postado : 05/05/2016 6:33 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Veja se é isto, eu só não inseri o combobox, uma vez que quer que continue o loop pelos arquivos, teria de alterar as rotinas para ser executada somente com o nome carregado no combo e não nos nomes listados na planilha.

Fiz somente a alteração nesta linha:
Produto.Offset(0, 1).Value = CustoMedio(ComboBox1.Text)

Substitui ComboBox1 por Produto
Produto.Offset(0, 1).Value = CustoMedio(Produto.Text)

Coloque este arquivo no lugar do "teste.xlsm"

[]s

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

 
Postado : 05/05/2016 10:25 pm
 danieldias
(@danieldias)
Posts: 21
Eminent Member
Topic starter
 

Show Mauro! Rodou perfeito! Obg.

 
Postado : 06/05/2016 8:25 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico