ATENÇÃO NOVOS USUÁRIOS

Se registrou recentemente? Seu cadastro será avaliado e mendiante aprovação, a conta será ativada e você poderá usufruir do fórum. O tempo de avaliação gira em torno de 24 a 48 horas.

Esqueceu sua senha?

Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Pesquisa resultou em 98 ocorrências

por Marciel Silva
Ter Mar 29, 2016 3:05 pm
Fórum: VBA Básico
Tópico: Importar TXT com critério
Respostas: 12
Exibições: 6780

Re: Importar TXT com critério

Mikel, boa tarde! Consegui adaptar o código na minha planilha. Porém tive que deixar a planilha com o mesmo layout da que eu mandei por exemplo para funcionar. O que deixei de alterar? Queria que começasse na linha 9 até a 50 e da coluna 14 até 40 (exemplo). Outra coisa: Abusando da sua boa vontade,...
por Marciel Silva
Seg Mar 28, 2016 3:56 pm
Fórum: VBA Básico
Tópico: Importar TXT com critério
Respostas: 12
Exibições: 6780

Re: Importar TXT com critério

Mikel.... o negócio está mais difícil do que eu imaginava... rsrsrs

Tentei adaptar na minha planilha mais sem sucesso.

A planilha é enorme para eu postar aqui (17mb).
Não sei onde estou pecando ao transferir o código.

Vou ver se consigo simplificar ela para enviar para você.

Obrigado!

Att,
por Marciel Silva
Seg Mar 28, 2016 2:41 pm
Fórum: VBA Básico
Tópico: Importar TXT com critério
Respostas: 12
Exibições: 6780

Re: Importar TXT com critério

Mikel, boa tarde! Fiz o teste e funcionou exatamente o que preciso. Agora só preciso que esclareça algumas dúvidas: 1- Se por ventura eu quiser jogar uns 5 TXT em uma pasta para que ele pegue tudo de uma vez... é possível alterando a linha "CaminhoArquivo = ThisWorkbook.Path & "\Ponto 080316.txt" ? ...
por Marciel Silva
Seg Mar 28, 2016 1:24 pm
Fórum: VBA Básico
Tópico: Importar TXT com critério
Respostas: 12
Exibições: 6780

Re: Importar TXT com critério

Mikel, boa tarde! Vou tentar esse código. É estranho que para você o texto esteja saindo em uma linha. Para mim ele sai conforme eu colei com exemplo para você. 0000392523080320161738000000001273 0000392533080320161745000000001279 0000392543080320161746000000001309 De qualquer forma vou testar o cód...
por Marciel Silva
Seg Mar 28, 2016 10:17 am
Fórum: VBA Básico
Tópico: Importar TXT com critério
Respostas: 12
Exibições: 6780

Re: Importar TXT com critério

Marciel , bom dia. Poderia dar mais detalhes sobre o layout desse arquivo texto? Dessa forma seria mais fácil de tentar lhe ajudar. Outra coisa, observei que na planilha, o registro dos funcionários é composto de 12 caracteres : " 000000001273 ". No arquivo texto, irei encontrar exatamente essa mes...
por Marciel Silva
Seg Mar 28, 2016 7:26 am
Fórum: VBA Básico
Tópico: Importar TXT com critério
Respostas: 12
Exibições: 6780

Importar TXT com critério

Senhores, bom dia! Mais uma vez precisando da ajuda de vocês. Toda batida de ponto é registrado em um .txt No excel tenho o número do funcionário e os dias do mês. Ao abrir o txt, na coluna 11 até a 19 tem a data da batida. Os últimos 12 números são os dos funcionários. Preciso que a macro encontre ...
por Marciel Silva
Dom Fev 22, 2015 3:18 pm
Fórum: Geral
Tópico: Somando duas matrizes
Respostas: 5
Exibições: 1479

Re: Somando duas matrizes

Mari, boa tarde! Que bom que resolveu! Para ajudar outros que possam ter a mesma dúvida que você, poderia deixar aqui registrado como foi a solução do seu problema. Estará ajudando muita gente! - Para marcar o tópico como resolvido, é só clicar no vezinho " V " do lado da palavra citar e do ponto de...
por Marciel Silva
Sex Fev 20, 2015 2:50 pm
Fórum: VBA Básico
Tópico: Listar data de modificação TXT
Respostas: 2
Exibições: 1191

Re: Listar data de modificação TXT

DJVSWD, boa tarde! Não sei se entendi, mas... Copie e cole o código abaixo do que você já tem na sua planilha! Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 And Cells(Target.Row, 1).Value <> "" Then Cells(Target.Row, 2).Value = Str(Now) End If End Sub Considerando que os d...
por Marciel Silva
Sex Fev 20, 2015 2:29 pm
Fórum: Geral
Tópico: Somando duas matrizes
Respostas: 5
Exibições: 1479

Re: Somando duas matrizes

Mari, boa tarde! Poderia disponibilizar sua planilha para ficar mais fácil lhe ajudar? {=SOMA(SE($JAN15.$C$4:$C$133=$A10;SE(JAN15.$F$4:$F$133=$A$2;SE(JAN15.$G$4:$G$133=$P$8;$JAN15.$H$4:$H$133;0);0))+SOMA(SE($FEV15.$C$4:$C$133=$A10;SE(FEV15.$F$4:$F$133=$A$2;SE(FEV15.$G$4:$G$133=$P$8;$FEV15.$H$4:$H$13...
por Marciel Silva
Sex Fev 06, 2015 2:52 pm
Fórum: VBA Básico
Tópico: Boão Maximizar e Minimizar VBA [RESOLVIDO].
Respostas: 3
Exibições: 1361

Re: Boão Maximizar e Minimizar VBA

lunatico,

Você abriu dois tópicos iguais. Neles você já obteve 3 ajudas e não deu nenhum feedback.

Posta o seu exemplo aqui que fica mais fácil lhe ajudar!

Att,