mateusmarona

Me ajudem, devo ser meio burro, pois não acho o botão de novo tópico,heheheheheh

Muito obrigado! Resolveu! Sabes me dizer como faço para criar ma macro que, se na célula A2 tiver um número e eu escrever a palavra "sim" em B2, a macro faz esta mesma pesquisa pela valor em A2 e lança o "sim" na coluna O , na linha correspondente ao número escrito em A2?

Bom dia! Não estou conseguindo entende como faço para criar novo tópico,por isso respondo por este. Estou precisando de uma macro de pesquisa que procure um valor "não exato" na planilha "Entregas" - range ("A:U"), pode ser uma palavra chave ou parte de uma palavra. A macro que tenho hoje já faz a primeira parte,ou seja, ela encontra o valor, se houver alguma correspondência. Porém se a macro não encontra nenhuma correspondência, ela dá erro. Gostaria que fosse feita uma correção na mesma e que isto gerasse uma mensagem de "valor não encontrado". Segue macro abaixo: Sub PesquisaNotaFiscalemEntregas() Dim Procurar As String Dim localizado, EndPrimeiroItem Application.ScreenUpdating = False Procurar = InputBox("Digite a Nota Fiscal procurada", "Localizar Registro de Agendamento") If Procurar = "" Then Exit Sub Sheets("Entregas").Select With Sheets("Entregas").Range("a:u") Set localizado = .Find(Procurar, LookIn:=xlValues, LookAt:=xlPart) localizado.Offset(0, 0).Select End With End Sub Valeu! Fico no aguardo.

Bom dia, Zinho. Muito obrigado pelo retorno, sua fórmula funcionou. Porém ainda estou com dificuldade de desenvolver a macro para envio de email, mesmo vendo pelo seu link. Podes tentar me ajudar? os endereços de e-mail para envio vão estar na aba ENVIO , célula I1. a planilha para ser colada no corpo do email fica no range A:H.

Prezados, realmente gostaria que alguém tentasse me ajudar neste ponto. É um caso bem urgente. Desde já agradeço àqueles que visualizaram.

Bom dia! Estou retomando este tópico pois preciso de ajuda e não estou conseguindo encontrar a opção de criar novo tópico, por mais besta que pareça, hehehe... Preciso desenvolver uma macro que faça a seguinte função: A aba "DBI 971" consta um relatório de pedidos em trânsito, que compreende o range A1 até o H e a quantidade de linhas varia de acordo com o dia. Na coluna E, consta o código de cada Transportadora responsável por cada entrega. Preciso que a macro possua uma caixa de texto para que eu escolha a transportadora pelo número, e assim que eu der OK, a macro filtre o relatório pelo código escolhido e envie um email automático contendo um texto padrão, um assunto padrão que mude a data de acordo com o dia do envio, cole o relatório no email, e mande este email para uma lista específica de emails cadastrados de acordo com o código da transportadora que consta em outra aba. Exemplo do email: _______________________________________________________________________________________ ASSUNTO: ENTREGAS EM ATRASO - __/___/____ (data muda de acordo com o dia) EMAIL: Prezados (as), Segue abaixo relatório de Notas Fiscais que ainda constam como pendentes de entrega na data de hoje. COLAR AQUI O RELATÓRIO (MANTENDO FORMATAÇÃO) Favor detalhar informações na coluna "H - Transportadora" (negrito e itálico). Caso alguma destas Notas Fiscais já esteja entregue, favor enviar EDI de entrega para [email protected] Conto com sua compreensão. Aguardo retorno. Atenciosamente, Distribuidora Memphis Ltda Transportes _________________________________________________________________________________________________________ Segue relatório em anexo. teste.xlsx

Márcio, no arquivo que você rodou, quantas vezes estas notas aparecem? No meu elas aparecem, mas veja se na mesma quantidade que da minha. ANEXO

Sim, elas importaram.

Na verdade eu não fiz nada, ela rodou certinho.

Márcio, bom dia! O arquivo importou sem erros, porém com diferença na quantidade de linhas. veja no anexo, por favor.

Márcio, boa tarde. Serve sim, importou direitinho, porém gostaria que verificasse a possibilidade de adicionar uma informação que consta nos arquivos txt, porém não foram consideradas. A coluna CIA representa cada unidade de faturamento da empresa, sendo assim, cada arquivo importado tem uma CIA específica para as notas fiscais. que o arquivo txt tem uma informação bem no início, que é a Companhia. Seria importante que a macro considerasse este dado para cada txt importado. Ou seja, se em um dos arquivos tiver a Companhia 807, a coluna C da aba Importação deve preencher todas as notas com este dado. Desde já agradeço muito pelo help, tá ficando show... Márcio, um detalhe. Ao rodar um txt com número alto de linhas, 150.000, a macro deu erro. Veja se consegue descobrir do que se trata. 808.rar

Boa tarde, Basole. O número grifado em vermelho é o número de linhas do TXT, e ele aparece várias vezes na macro, tanto que quando quero rodá-la eu substituo todos os números que determinam o máximo de linhas por um maior ou menor, dependendo do arquivo gerado. O que eu precisava é que a macro rodasse e fizesse todas suas ações, porém sem limitar o range, de maneira a macro poder identifica sozinha o número máximo de linhas, tornando ela automática. E eu não posso rodar ela no Access porque toda a empresa utiliza este relatório e eu não posso mudar seu formato, eu apenas quero um meio de torná-la mais inteligente e fluida.

Boa tarde. Na verdade este TXT é gerado automaticamente do meu sistema, não temos como modificar nada.

Márcio, o formato da planilha anexa será sempre o mesmo, pois ele é a base para outros relatórios da empresa. Na verdade, eu preciso de todos os dados da planilha, até a coluna Z, mas eles não mudam de posição nunca. Se precisares de mais alguma informação, é só pedir. Obrigado.

Bom dia. Obrigado pelo retorno. Segue em anexo o arquivo txt e o resultado da macro em Excel. Cada CIA representa um CNPJ de faturamento, sendo assim preciso extrair um txt para cada, e o número de linhas depende do volume de faturamento. Na CIA801, geralmente o txt retorna em torno de 15000 linhas, porém tenho outras CIAD que geram até 100.000 linhas. Para não ficar ajustando manualmente e perdendo tempo, seria ótimo se a macro fosse realmente mais enxuta e identificasse sozinho a quantidade de linhas que serão utilizadas. Desde já agradeço, espero que consigam me ajudar. 801.txt 801.rar