Isso acontece porque alterei a realização de Cálculo Automático para Manual com o objetivo de melhorar desempenho da macro, assim sendo, quando identifica a falta de informações do cliente, ele para de gerar as etiquetas e consequentemente o código é finalizado no modo manual.

Para resolver isso, basta adicionar o código abaixo, alterando novamente para Cálculo Automático caso a condição citada ocorra. Confira a imagem em anexo.

Application.Calculation = xlCalculationAutomatic

Muito obrigado pelo seu tempo e atenção, ficou ótimo, é exatamente o que eu precisava.

Desculpe o delay no retorno, mas eu achei q ja tivesse caido no esquecimento, e me deparo com sua reposta. Muito obrigado amigo.

Ultima coisa, eu notei que am alguns momentos, a soma dos valores nao ocorre de forma automatica, como se estivesse meio travado e qdo eu clico na formula e enter, a soma acontece. Alguma dica?

Denovo, muito obrigado, ajudou muito sim!

A planilha ficou um pouco bagunçada devido a alguns teste.

Funcionamento Etiqueta Geral:

O script irá fazer a leitura da esquerda para a direita, do primeiro ao último, pode adicionar ou remover pedidos que irá funcionar da mesma forma.

Tomei liberdade de desenvolver algumas limitações para o bom funcionamento do script e do delivery, por exemplo, pode acontecer de esquecer de preencher o endereço e tentar gerar a etiqueta, o script irá parar caso ocorra.

A nata é a função(=TotalPedido) que fiz para calcular o total do pedido, selecione apenas o intervalo que contém a quantidade do pedido que a função retornará o total baseado em qual prato foi preenchido, multiplicando a quantidade x valor. Da mesma forma, pode adicionar ou remover pratos.

Faça alguns teste e veja o funcionamento do script. Espero ter ajudado.

Você precisa que a macro percorra todos os clientes com pedidos pendentes, ou que somente gere 1 etiqueta para o cliente de sua escolha?

Enviado!