VBA - Excel- Copiar Dados

Question

Será que alguém consegue me ajudar?

Eu tenho uma planilha à esquerda preenchida conforme a imagem e eu preciso que os dados dela sejam colados na planilha da direita com base em algumas condições eu já fiz o código que preenche para o produto 1203 mas preciso que ela continue preenchendo agora analisando o condicional para os códigos 1170 / 1202 e ir preenchendo abaixo sem subscrever os dados do primeiro produto.

O código que já escrevi é esse abaixo, se alguém conseguir agradeço muito.

Sub preencher()

linha = 4

Do Until Cells(linha, 1) = ""

If Cells(linha, 4) > 0 Then

Cells(linha, 11) = Cells(3, 4)

Cells(linha, 12) = Cells(1, 6)

Cells(linha, 13) = Cells(linha, 1)

Cells(linha, 14) = Cells(linha, 2)

Cells(linha, 16) = Cells(linha, 4)

End If

linha = linha + 1

Loop

End Sub

Answer 1

Olá , tudo bem?

Obrigada por entrar em contato com a Comunidade Microsoft.

Meu nome é Valéria e farei o possível para ajudar.

Para obter maiores esclarecimentos sobre o seu questionamento, peço a gentileza de acessar o link abaixo que vai direcioná-lo ao MSDN que é um fórum especialmente destinado para desenvolvedores e profissionais em TI para tratar está questão.

https://social.msdn.microsoft.com/Forums/pt-BR/....

Para criar uma nova pergunta no fórum MSDN, acesse:

https://social.msdn.microsoft.com/Forums/pt-BR/....

Basta logar com a sua conta Microsoft.

Espero ter ajudado, até mais!