Inquiridor
Código VBA para copiar e colar dados para outra planilha

Pergunta
-
Olá! Preciso de uma ajuda com um código VBA que estou tentando criar. Na planilha Registros são 7 colunas, A (Data Registro), B (Fornecedor), C (Duplicata), C (Série), D (Valor), E (Data Vencimento), F (Data Pagamento) e G (Situação). Então, na coluna G existe uma fórmula SE, e quando as células da co luna F são preenchidas, elas ficam verdes e a Situação passa a ser "Paga". Só que eu gostaria que quando isso acontecesse, as células da coluna de A até F fossem copiadas para outra planilha, a planilha Arquivos. Não estou consiguindo criar um loop para percorrer todas as linhas preenchidas e verificar a Situação de "Paga" e copiar e colar na outra planilha. O código para excluir a linha e criar outra no final eu já tenho. E após esse processo, a célula ativa deve ser a primeira abaixo da última linha preenchida, o da coluna A.
- Editado Douglas2020 segunda-feira, 10 de agosto de 2020 16:58
Todas as Respostas
-
A melhor forma de agradecer e votar como util e / ou marcar como resposta. Anderson Diniz diniabr2011@gmail.com
- Editado AndersonFDiniz2 segunda-feira, 10 de agosto de 2020 11:54
-
Muito bom! Está me ajudando bastante a entender o processo dos códigos. Mas encontrei um vídeo que o tutorial parece ser melhor aplicado para o meu caso: youtu.be/_Ypqqj5Zx0U. Só não estou conseguindo colocar link e imagens porque diz que minha conta ainda não é verificada.
E para selecionar todas as células da linha à esquerda da coluna G, para copiar e colar na outra planilha, eu estava pensando em usar Selection.End(xltoLeft).select dentro da função If no VBA, mas não sei se é correto.
Me desculpe, é que eu sou muito iniciante em VBA. Agora é que estou aprendendo e escrevendo os primeiros códigos.
- Editado Douglas2020 segunda-feira, 10 de agosto de 2020 17:00
-
Eu faria exatamente como está no vídeo.
A melhor forma de agradecer e votar como util e / ou marcar como resposta. Anderson Diniz diniabr2011@gmail.com
- Sugerido como Resposta AndersonFDiniz2 segunda-feira, 10 de agosto de 2020 23:11
- Editado AndersonFDiniz2 terça-feira, 11 de agosto de 2020 00:00