Reinaldo qual o seu email para que eu possa te enviar a planilha?

Poxa, o problema agora é outro. Como a célula atualiza a cada 3 segundos, ela fica chamando essa userform sem parar tipo um loop. se puder me ajudar d...

Valeu reinaldo, deu certinho. só apaguei o Msgbox ficando assim Private Sub Worksheet_Calculate() If Range("B1") = "0" Then userf...