Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Pesquisa resultou em 26 ocorrências
- Dom Nov 21, 2021 6:43 pm
- Fórum: VBA Básico
- Tópico: Procurar em .txt e Organizar cada produto.
- Respostas: 4
- Exibições: 2605
Re: Procurar em .txt e Organizar cada produto.
ola Raygsson, sou leigo em vba, to tentando até agora desde manha aprender com videos no youtube, mais segue em anexo o arquivo XML(txt) e copia do exemplo de como o vba tem de organizar os dados do XML. se puder olha agradeço desde já. O script base está ai, pra um exemplo melhor anexe o seu arquiv...
- Dom Nov 21, 2021 11:21 am
- Fórum: VBA Básico
- Tópico: Procurar em .txt e Organizar cada produto.
- Respostas: 4
- Exibições: 2605
Re: Procurar em .txt e Organizar cada produto.
bom dia Raygsson, desde já agradeço a resposta, Esse seu texto é um XML, o VBA tem métodos pra fazer a leitura disso. No exemplo abaixo inclui o texto na célula A1, com algumas modificações pode ser carregado direto do .TXT tbm. Sub Exemplo() Set objXML = CreateObject("MSXML2.DOMDocument.6.0&qu...
- Qui Nov 18, 2021 3:46 pm
- Fórum: VBA Básico
- Tópico: Procurar em .txt e Organizar cada produto.
- Respostas: 4
- Exibições: 2605
Procurar em .txt e Organizar cada produto.
Pessoal abaixo está um exemplo que consegui dentro de um arquivo .txt com os mesmos dados, todo organizado em um padrao. como voces podem ver cada produto é separado pela grandeza <produto item="1"> ,onde o sistema vai identificar a cada novo produto o numero ="1"; ="2"...
- Qui Jul 22, 2021 9:09 pm
- Fórum: Geral
- Tópico: Localizar parte da palavra e Retornar
- Respostas: 2
- Exibições: 3938
Re: Localizar parte da palavra e Retornar
OLÁ srobles, desculpa a demora, sua planilha tem o teor que eu buscava, exatamente mostrar as "frases/palavras que contenham o que eu busco", eu percebi que ao encontrar o que procuro ela me mostra a lista, e devo escolher a que quero, mais em uma busca com centenas eu teria de escolher um...
- Dom Fev 28, 2021 9:02 pm
- Fórum: Geral
- Tópico: Localizar parte da palavra e Retornar
- Respostas: 2
- Exibições: 3938
Localizar parte da palavra e Retornar
Saudações colegas do Excel, seguinte, eu uso muito planilhas onde trabalho, e tenho que fazer muito relatorio de comparação, dados externos x dados internos, para encontrar os erros. Eu uso muito PROCV, as vezes com condicionais, mais vejo que chega a um limite, devido a PROCV não ser tao ampla nos ...
- Ter Mar 26, 2019 10:04 am
- Fórum: VBA Básico
- Tópico: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO-RESOLVIDO-
- Respostas: 22
- Exibições: 15022
Re: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO
No Vba toda linha que inicia com apostrofe " ' " é considerada como comentário ou texto explicativo. Essa linha está comentada ('), deixei como exemplo para mostrar como será a sintaxe caso deseje verificar uma string(texto) maior com um valor especifico As duas linhas são apenas comentár...
- Ter Mar 26, 2019 7:55 am
- Fórum: VBA Básico
- Tópico: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO-RESOLVIDO-
- Respostas: 22
- Exibições: 15022
Re: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO
Já não estou entendendo. Para verificar se é letra deverá ser utilizado: Esta linha separa o caractere da posição 393( midi(L,393,1), converte para maiúsculo UCase(...), e atribui valor ASCII Asc(...); a variavel xAsc recebe então esse valor. xAsc = Asc(UCase(Mid(L, 393, 1))) Esta linha verifica se...
- Seg Mar 25, 2019 1:19 pm
- Fórum: VBA Básico
- Tópico: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO-RESOLVIDO-
- Respostas: 22
- Exibições: 15022
Re: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO
Nessa proposta--> If Mid(L, 296, 6) = "130818" <-- e verificado se o conteúdo de 296 à 304 é igual a "130818" A sintaxe da função mid é -->Mid(string, start[, length])<-- (similar a função deplanilha Ext.Texto) E retorna um String(Texto) de seis caractere Bom dia Sr Reinaldo, ne...
- Sex Mar 22, 2019 12:40 pm
- Fórum: VBA Básico
- Tópico: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO-RESOLVIDO-
- Respostas: 22
- Exibições: 15022
Re: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO
Na posição 296 à 304 encontra-se o campo que"negritou" em seu post anterior " 130918 00000000000..." assim o "valor" está entre aspas pois o retorno e strings(texto), deixei comentado apenas como deve ser a sintaxe se quiser/necessitar utilizar esse local para comparaç...
- Qui Mar 21, 2019 1:33 pm
- Fórum: VBA Básico
- Tópico: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO-RESOLVIDO-
- Respostas: 22
- Exibições: 15022
Re: IMPORTAR TXT A PARTIR DE CERTA POSIÇÃO
Logo apos o Do While 'INSERIR DADOS NA PLANILHA '------------------------------------------------------------- Do While Not EOF(I) frmmenu.LBLSTATUS.Caption = "PROCESSANDO LINHA:" & LN - 1 DoEvents Line Input #I, L 'Verifica se o valor da string é o esperado 'If Mid(L, 296, 6) = "...