Página 1 de 1
Código Do While...Loop para replicar o valor de uma célula
Enviado: 05 Jun 2015 às 11:36
por rborges
Bom dia amigos!
Tenho uma arquivo em txt que importo para o excel no qual tenho que filtras todas as contas contábeis.
O problema é q o número da conta aparece somente um uma linha, ou seja se na conta tiver 7 lançamentos o número da conta só aparece uma vez..preciso replicar esse numero da conta para os demais lançamentos até o momento q começa outra conta.
Penso q a melhor forma seria utilizar o código Do While porém não estou conseguindo montar o código
Estou mandando a planilha em questão em anexo. o número da conta esta na coluna B, no começo inicia a conta 11215111 na célula B2 e na célula B16 inicia outra conta, o que preciso é que neste intervalo (B2:B15 seja copiada a conta da célula B2 e assim se repita toda vez que é encontrada uma nova conta, como diferenciação para saber qdo começa uma nova conta na coluna A tem a informação "Conta:" sempre q esse valor aparece se inicia uma nova conta.
Se algum dos colegas puder me ajudar com esse código ..ficaria muito grato
Re: CÓDIGO DO WHILE ..LOOP PARA REPLICAR O VALOR DE UMA CÉLU
Enviado: 05 Jun 2015 às 12:48
por duds
Boa tarde rborges!
Segue em anexo planilha com o código que você pediu!
O código se encontra dentro de plan1(....). Utilizei For e Next que é digamos que parecido com do while
Utilizei a coluna base para verificar o número de linhas como sendo a coluna G, pois notei que ela sempre está preenchida no final de sua conta!
Me avise se não for isso que você procura ou se gostaria de alguma modificação!
Att.
Re: Código Do While...Loop para replicar o valor de uma célu
Enviado: 05 Jun 2015 às 16:03
por rborges
Obrigado duds..pela ajuda
Não havia visto na prática esse código for next..muito legal
Reparei que o código ativa automaticamente né..só q depois q ela executa todo procedimento ela ainda fica rodando..isso é normal?
Como faço para colocar esse código para ser ativado por um botão?
Código Do While...Loop para replicar o valor de uma célula
Enviado: 05 Jun 2015 às 19:10
por duds
É normal pois coloquei o evento selectionchange da planilha como condicional para a macro ser executada! Para colocar em botão deve copiar o código e colar em um módulo normal, trocar a linha que diz "private sub....." Para apenas "sub nomedasuamacro" e então atribuir a macro à algum botão à sua escolha! Não esqueça de excluir o código que está na planilha
Re: Código Do While...Loop para replicar o valor de uma célu
Enviado: 08 Jun 2015 às 09:52
por rborges
Bom dia duds obrigado pela ajuda..mas apareceu mais uma variável...
Na coluna A tenho os centro de custos misturados com valores em branco...precisaria aplicar essa mesma regra da conta no cento de custo..tentei entender o código q vc fez ..mas não consegui..no caso o primeiro centro de custo aparece na A4.
Se puder me ajudar ,,
desde ja agradeço
Estou mandando o arquivo em anexo
Código Do While...Loop para replicar o valor de uma célula
Enviado: 08 Jun 2015 às 14:29
por duds
Boa tarde
Eu só preciso saber de alguns parâmetros, como:
- Os espaços vazios que estão antes destes centros de custo deverão ser preenchidos ou não?
- Espaços vazios seguintes devem ser preenchidos com o mesmo número até que outro número apareça, correto?
Aguardo sua resposta.
Att.
Re: Código Do While...Loop para replicar o valor de uma célu
Enviado: 08 Jun 2015 às 15:43
por rborges
Boa tarde duds,
o código deverá seguir a mesma regra do outro código, só replicar o nº do centro de custo para baixo até encontrar outro nº de conta...c for 0 ou banco pode colar por cima.
os q tiverem acima não precisa preencher..
Re: Código Do While...Loop para replicar o valor de uma célu
Enviado: 08 Jun 2015 às 16:15
por duds
Segue a planilha com o código atualizado.
Qualquer dúvida me avise!
Aguardo sua resposta.
Att.
Re: Código Do While...Loop para replicar o valor de uma célu
Enviado: 09 Jun 2015 às 09:25
por rborges
Bom dia duds...gostaria de agradecer pela grande ajuda...consegui formatar o relatório e executar seu código e o trabalho q demora muito..agora é realizado em segundos..muito obrigado mesmo.
Gostaria de pedir mais uma ajuda....tenho um arquivo q tbem é gerado em txt, porém nele são gerados informações de vários estabelecimento como cabeçalho:
Estabelecimento: 107 - NOME DA EMPRESA
Linha..........: 12 - LINHA ARARUNA
Periodo........: Maio / 2015 - Dezena: 1
Ao importar o arquivo para o Excel as informações são cortadas:
Estabeleci mento: 107 #NOME?
Linha..... .....: 12 - LINHA ARARUNA
Periodo... .....: Mai o / 2015 - Dezena:
Preciso de um código que extraia "mento: 107" e deixe apenas o estabelecimento ou seja o número (107/109/110/111) e dai então replique o valor na coluna A e siga aquela mesma regra do arquivo anterior, ou seja qdo encontrar um novo estabelecimento ele copia as informações do outro estabelecimento e assim por diante.
Poderia me ajudar com mais esse "pepino"....
Código Do While...Loop para replicar o valor de uma célula
Enviado: 09 Jun 2015 às 17:02
por duds
Boa tarde rborges!
Fico feliz que tenha funcionado. Para esse caso que você apresentou agora, preciso saber de uma coisa, esses números serão sempre com 3 algarismos?
Aguardo sua resposta.
Att.
Re: Código Do While...Loop para replicar o valor de uma célu
Enviado: 10 Jun 2015 às 00:13
por duds
Boa noite rborges,
Fiz uma planilha, e a coloquei em anexo, que faz o que você quer porém só está funcionando caso o número contenha apenas 3 algarismos!
Me avise caso tenha mais alguma dúvida,
Aguardo sua resposta.
Att.
Re: Código Do While...Loop para replicar o valor de uma célu
Enviado: 12 Jun 2015 às 20:39
por rborges
Boa noite duds!
Muitissímo obrigado pela grande ajuda....deu certo!!