Cleisonjr

Prezados, necessito com urgência, criar um programa no VBA ( Não tenho afinidade com VBA o meu conhecimento é muito limitado) que vai monitorar os valores de temperatura e umidade. Tipo a temperatura deverá ser no minimo 20°C e no max 30°C para ser ideal, e a umidade entre 75 a 85, caso a temperatura esteja acima de 30 graus e a umidade esteja 85 e 90 mostra mensagem de atenção, caso a temperatura esteja abaixo de 30 e a umidade a umidade abaixo de 30 mostra mensagem de alarme. da forma que fiz não funcionou. Sub Monitor_Temp_Umidade() Dim Temp_Ideal, Umid_Ideal As Boolean Temp_Ideal = Range("C4").Value Umid_Ideal = Range("D4").Value If (Temp_Ideal >= 20) Or (Temp_Ideal <= 30) And (Umid_Ideal >= 75) Or (Umid_Ideal <= 85) Then 'Ideal' Range("E4").Value = "Ideal" Else If (Temp_Ideal > 30) And (Umid_Ideal > 85) Or (Umid_Ideal <= 90) Then 'Atenção' Range("E4").Value = "Atencão" Else If (Temp_Ideal) > 30 And (Umid_Ideal < 30) Then 'Alarme' Range("E4").Value = "Alarme" MsgBox "Atenção" + "!", vbCritical, "EMERGENCIA" End If End If End If End Sub desde já agradeço a compreensão e a colaboração.