Notifications
Clear all

Macro para preencher células a partir de dado

2 Posts
2 Usuários
0 Reactions
959 Visualizações
(@jpfornari)
Posts: 43
Trusted Member
Topic starter
 

Olá companheiros,

Em anexo segue um planilha na qual estou quebrando a cabeça para desenvolver o seguinte raciocínio:

-> Estou montando uma planilha para controlar a locação de máquinas e acessórios aqui em minha empresa.
-> Cada máquina e acessório tem um Lacre no qual é informado o numero de registro e a cor do lacre que informa se o mesmo é alugado, próprio ou emprestado.
-> Além desse numero de registro do lacre, temos um Código de sistema interno que é referente ao material (Insumo), que pode ser um Martelo, uma Furadeira....

EX: Eu tenho um Martelo que no sistema interno é encontrado com o Código (658163). Possuo 10 Martelos, para saber qual é temos um numero diferente em cada lacre.

Na planilha em anexo Tenho na Coluna "R" os Materiais, na "S" o Cod. do material e na coluna "T" os números do lacre.

Estou tentando desenvolver uma macro para quando eu Digitar o numero do lacre na coluna "E" ele automaticamente preencha a célula respectiva das Colunas "C" e "D".

Quando eu escrever, ou selecionar o Material na Coluna "C" ele Informa o Cod. na célula respectiva na coluna "D" e lista as opções disponíveis para o numero do lacre "E".

E quando eu escrever o Cod. na Coluna "D" ele informa o Material na celula respectiva na coluna "C" e lista as opções disponíveis para o numero do lacre "E".

Pensei em várias formas, mas nenhuma deu um resultado Esperado.

Gostaria de saber se é possível alguém ajudar a desenvolver essa macro.

Obrigado a todos.

Att:

Favor compactar os arquivos, leia as regras do fórum!!

João Fornari

 
Postado : 23/05/2013 11:46 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

João, não vi seu anexo, mas acredito que tudo o que pretende daria para fazer sem VBA, só com formulas utilizando as funções Indireto, Corresp, Indice, Desloc e por ai vai, a única coisa e isto serviria para com o VBA tambem, é o Layout de como está digitando.

Digitar o numero do lacre na coluna "E" ele automaticamente preencha a célula respectiva das Colunas "C" e "D".
Ok, conseguimos isto com formulas e VBA.

Quando eu escrever, ou selecionar o Material na Coluna "C" ele Informa o Cod. na célula respectiva na coluna "D" e lista as opções disponíveis para o numero do lacre "E".
Aqui, não teria como, se optarmos por Formulas, a Coluna "C" teria a respectiva função para realizar a operação acima, portanto não teria como digitar na mesma que apagaríamos a formula, em VBA podemos utilizar o Evento Change para focar quando "C" for alterado e buscar os respectivos valores, mas ao optar pela mesma ação ao digitar em "E" "C'" será alterado e irá mudar o valor de "D" e entramos em um loop.

Melhore o Layout de entradas e e saidas dos ranges e monte um exemplo compactado com alguns dados e no mesmo uma aba com os resultados esperados.

[]s

 
Postado : 23/05/2013 6:29 pm