Olá @Leandro_Maia!
O que você deseja fazer nesse script? Quais variáveis deseja modificar?
Analisando o seu script, tenho algumas considerações:
1 - O trecho abaixo não pode ficar “no meio” de um script, pois pelo que eu entendi ITemperatura é uma variável auxiliar, e no meio do script, esse trecho corresponde a uma comparação. Além disso, você utilizar a função Set, sem utilizar nenhum objeto, ou seja, a linha inteira está com sintaxe incorreta.
iTemperatura = Application.GetObject(“EstacaoMeteorologica1.TemperaturaAmbiente”),2)
2 - Dentro do IF, você está fazendo repetidas atribuições à uma mesma variável. Apenas uma atribuição é suficiente.
3 - A função left é útil somente para strings.
Portanto, preciso saber o que deseja fazer, para que possa auxiliá-lo com o script correto.