1
resposta

Calculate

Após alterar uma única célula, não altera as demais, pode explicar o que há de errado no código?

Insira aqui a descrição dessa imagem para ajudar na acessibilidade

Versão: Excel 2016

1 resposta

Olá Luana, tudo bem com você?

Peço desculpas pela demora em obter um retorno.

Ao analisar a imagem que você disponibilizou não foi possível identificar nenhum erro. Todavia, para que todas as células sejam alteradas automaticamente, modifique o valor à direita do sinal de menor (<), ou seja, altere o valor 15 para qualquer outro, por exemplo, If pQtdEstoque < 30 Then, salve o arquivo VBA e após isso, selecione a aba "Produtos Infantis" na célula F3 e clique CONTROL + ENTER e todas as células abaixo serão alteradas.

Espero ter ajudado. Continue mergulhando em conhecimento e não hesite em voltar ao fórum para continuar aprendendo e interagindo com a comunidade.

Em caso de dúvidas estou à disposição.

Abraços e bons estudos!

Caso este post tenha lhe ajudado, por favor, marcar como solucionado ✓. Bons Estudos!