Página 1 de 1

Manipular arquivos de texto

Enviado: 17 Jul 2016 às 20:00
por Sandman
Boa noite pessoal,
estou tentando desenvolver uma solução em VBA mas me deparei com dificuldades, seguinte, estou tentando fazer uma planilha que baixe o arquivo dos resultados da lotofacil, descompacte o mesmo, pois ele vem compactado, e depois percorra lendo o arquivo de extensão .htm, um arquivo de texto, a ideia seria a seguinte, quando executado, o algoritmo iria verificar qual o ultimo concurso que existe na planilha, por exemplo o 1423, depois o algoritmo iria baixar o arquivo, descompactar o mesmo, e começar a leitura até encontrar o resultado 1423, e após isso iria comecar a transferir os resultados subsequentes para a planilha para que depois eu possa manipular os mesmos, eu ja descobri o padrão para fazer a tal leitura, porem não sei como proceder no vba para tal feito, para baixar o arquivo atualizado do site da caixa para o pc, e depois descompactar o mesmo eu ja consegui um codigo e adaptei para o meu uso, agora preciso da ajuda para continuar efetuando a leitura e transferencia dos dados do .htm para a planilha...
o padrão para encontrar o que preciso dentro do .htm, é o seguinte, entre as tags td, teria que encontrar um texto que contenha duas barras // logo é um texto que contem uma data, daí é sempre o mesmo padrao, uma linha antes da data, eu tenho o numero do concurso, e nas 15 linhas abaixo da data eu tenho as 15 dezenas sorteadas, são essas as informações que eu preciso, o numero do concurso, a data e as 15 dezenas que foram sorteadas....

enfim, espero ter explicado de uma forma clara, mas qualquer duvida, é só dizer que iremos nos falando, assim como qualquer ajuda é bem vinda :mrgreen:

segue a planilha em anexo para que voces verem até aonde ja cheguei

ps* para que a planilha funcione, é preciso criar uma pasta na raiz do C: chamada lotofacil, ficando o caminho absoluto dessa forma C:\lotofacil\

Desde já muito obrigado e viva o excel \o/

Re: Manipular arquivos de texto

Enviado: 20 Jul 2016 às 00:52
por engeel2014
Boa noite amigo, será se a planilha anexa te atende?

Verifica ai e me dá um retorno.

Att.: Lucélio

Re: Manipular arquivos de texto

Enviado: 20 Jul 2016 às 03:47
por DJunqueira
Uma outra forma de fazer.
Solução importando os dados p/ substituir tabelas já existentes. Divisão em duas tabelas, uma com número do sorteio, cidade e estado e outra sem os campos cidade e estado, pois estes dois campos geram muita repetição de informação e é fácil vincular esta tabela de cidades e estados pelo número do sorteio. Essa importação/separação é feita direto pelo Query table / Nova Consulta bastando clicar no botão atualizar. Importar substituindo a tabela antiga é mais fácil e rápido q ficar filtrando por macro. Vc terá q indicar novamente onde está a fonte de dados, a importação é feita como se o arquivo fosse um arquivo XML.