Tomás Vásquez Fórum

Boa Noite Pessoal do fórum,

Preciso de mais uma ajuda de vocês, tenho esse código abaixo estou precisando fazer que ele não busque nas células vazias.
Porque quando eu vou fechar esse arquivo, o código busca valor abaixo de 50% e acaba buscando as células vazias
Alguém pode me ajudar a acertar esse código.

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Dim faixa As Range

Set faixa = Sheet1.Range("C45:O45") ' coloque aqui a faixa deseja a ser verificada

For Each celula In faixa
If celula.Value < "0,5%" Then
MsgBox "Erro na Planilha!"
Cancel = True
celula.Select
Exit For
End If
Next
End Sub

Obrigado novamente.....

Olá amigo...

Sabe..é nessas horas que da vontade da gente pegar um martelo e dar uma martelada vigorosa em das bolinhas de nosso saquito....rsrsrsrrs ... ....

Não sei quanto tempo vc ta agarrado com a sua necessidade, mas faz o seguinte ae: Só muda acrescentando o And celula.Value <> "" , pois assim só vai dar msg de erro se for diferente de vazio e menor do que 50%...

PS: tb to aprendendo e não esquenta não que essa parada de programação eu to vendo que é sempre assim...10000 dias fuçando pra resolver um problema e do nada a solução se apresenta e depois a gente ve que não é nada de mais....

Ve ae se era isso mesmo ou se eu to viajando na maionese.....

Att,

Bom dia Souza,

Cara muito obrigado pela dica, erra isso mesmo que faltava para eu terminar essa planilha.
É como você me falou tem horas que a gente tem vontade de bater a cabeça na parede, eu como sou novo em VBA procuro muita coisa na net. tem horas que cansa rsssss.........cara fique 2 dias pra ajustar esse código........mais no final valeu apena o resultado...


Obrigado novamente