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

macro para extrair dados

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Diego luiz
Acabou de chegar
Acabou de chegar
Mensagens: 7
Registrado em: Dom Fev 21, 2016 1:54 pm

macro para extrair dados

Mensagem por Diego luiz »

Bom Dia,

Gostaria de criar uma macro que fizesse uma pesquisa em uma célula do excel e extraísse os seguintes dados: MPU 03994/2016 e TAE/COE: 08016casog3. O problema é que essa fonte de dados dentre várias colunas que o sistema gera em uma coluna da planilha o campo observação “aparecem” , uma em cada linha conforme abaixo:

Observação:

1 -PROCESSO: mpu 03994/2016 MATERIAL DE LIMPREZA TAE/COE: O8016CASOG3

Observação:
2 - PROCESSO: MPU 4780/2016. SERVICOS DE ORGANIZACAO DE EVENTOS (60 COFFEE BREAKS) TAE 08016ENFO3


Eles não seguem um padrão ( esses dados estão em uma coluna observação gerada por um relatório). Ora vem no começo, ora vem no final. Tem linhas dessa planilha que o TAE vem sozinho, outras vem acompanhado pelo COE. Tem momentos com “/” entre eles.


Resumindo:

Preciso dos dados do processo e do TAE/COE ( TAE : conforme mostra no item 2) em colunas separadas desse campo observação

Já vi algumas formulas do excel que até ajudam, mas não resolvem o problema.

Abraços


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
Mikel Silveira Fraga
Jedi
Jedi
Mensagens: 1173
Registrado em: Sex Mai 27, 2011 3:27 pm
Localização: Governador Valadares - MG
Contato:

Re: macro para extrair dados

Mensagem por Mikel Silveira Fraga »

Diego, boa tarde.

Cara, você disse que esse relatório veio do sistema. Mas já vem no formato de Excel ou em outro formato, tipo Txt?

Teria como disponibilizar esse relatório? Se não existe um padrão, é preciso analisar o documento e localizar alguma informação que sirva como padrão.

Infelizmente, apenas com os dados informados, não da pra fazer muita coisa.

Ficamos no aguardo.


Diego luiz
Acabou de chegar
Acabou de chegar
Mensagens: 7
Registrado em: Dom Fev 21, 2016 1:54 pm

Re: macro para extrair dados

Mensagem por Diego luiz »

boa noite,

o arquivo é .xls do excel.

enviei o anexo
Anexos
MODELO.rar
(8.77 KiB) Baixado 174 vezes


Avatar do usuário
Mikel Silveira Fraga
Jedi
Jedi
Mensagens: 1173
Registrado em: Sex Mai 27, 2011 3:27 pm
Localização: Governador Valadares - MG
Contato:

Re: macro para extrair dados

Mensagem por Mikel Silveira Fraga »

Diego, boa tarde.

Cara, estive analisando o seu arquivo e surgiu algumas dúvidas:
Diego luiz escreveu:Preciso dos dados do processo e do TAE/COE ( TAE : conforme mostra no item 2) em colunas separadas desse campo observação
1º) Na mensagem acima, você mencionou que precisaria do processo e do TAE/COE. Em relação ao processo até entendi, mas você enviou um arquivo com outros códigos diferentes: CAE e CCV. Quantos códigos podem aparecer no total?

2º) Esse arquivo que você me enviou, já foi mexido. Na Plan1, que na teoria seria a aba importada do sistema, não parece ter sido enviada direto do sistema. Teria como gerar um relatório "original", sem ter sido modificado? Geralmente, estes relatórios podem vir com informações extras que podem auxiliar no processo de referência para captura da informação.

Caso o arquivo que me enviou já seja o original, favor apenas esclarecer a primeira dúvida.

Fico no aguardo.


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.


Diego luiz
Acabou de chegar
Acabou de chegar
Mensagens: 7
Registrado em: Dom Fev 21, 2016 1:54 pm

Re: macro para extrair dados

Mensagem por Diego luiz »

boa tarde,

Mikel,

1º Normalmente aparecem os dois primeiros: TAE/COE. Com relação ao CAE e CCV são codificações parecidas com a anterior. Normalmente recebo na maioria dos casos TAE/COE, poucas vezes recebo com o CAE e CCV que separamos manualmente por serem relacionados a outros processos. Pode desconsiderá-los e considerar somente o TAE/COE.

2º Recebo o relatório dessa forma ( copiei somente a coluna de observação). Não recebe o relatório original.


Avatar do usuário
Mikel Silveira Fraga
Jedi
Jedi
Mensagens: 1173
Registrado em: Sex Mai 27, 2011 3:27 pm
Localização: Governador Valadares - MG
Contato:

Re: macro para extrair dados

Mensagem por Mikel Silveira Fraga »

Diego, boa tarde.

Cara, fiz uma adaptação, com base no relatório que você enviou.

Para funcionar do jeito que você precisa, altere os comandos:

Código: Selecionar todos

codProc(1) = VBA.LCase("cae"): codProc(2) = VBA.LCase("ccv")
Pelos comandos:

Código: Selecionar todos

codProc(1) = VBA.LCase("tae"): codProc(2) = VBA.LCase("coe")
Teste e veja se vai funcionar.
MODELO.zip
Alterado por: Mikel S. Fraga
(17.25 KiB) Baixado 193 vezes
Aguardo retorno.

Abraços e bom final de semana.


Diego luiz
Acabou de chegar
Acabou de chegar
Mensagens: 7
Registrado em: Dom Fev 21, 2016 1:54 pm

Re: macro para extrair dados

Mensagem por Diego luiz »

Boa noite,

Mikel,

Muito obrigado. Funcionou perfeitamente. Quanto ao código só restou uma dúvida: caso queira aumentar o número de processos onde posso colocar a quantidade de linhas ( por exemplo: 80 linhas para consultar os resultados.).

Mais uma vez obrigado pela atenção e ajuda.


Avatar do usuário
Mikel Silveira Fraga
Jedi
Jedi
Mensagens: 1173
Registrado em: Sex Mai 27, 2011 3:27 pm
Localização: Governador Valadares - MG
Contato:

Re: macro para extrair dados

Mensagem por Mikel Silveira Fraga »

Diego, bom dia.

Cara, na verdade não existe essa necessidade. A rotina irá rodar em todas as linhas da coluna A, ou de outra que for definida com as informações, independente de serem 10, 20, 40, 80 ou até 1000 linhas preenchidas. É preciso apenas que a coluna correta esteja preenchida.

Forte abraço e excelente semana.


Diego luiz
Acabou de chegar
Acabou de chegar
Mensagens: 7
Registrado em: Dom Fev 21, 2016 1:54 pm

Re: macro para extrair dados - Resolvido

Mensagem por Diego luiz »

valeu muito obrigado


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.


Responder