Olá a todos!
Estou com um simples, mas sério problema.
Tenho tentado compreender as variáveis no código a seguir.. eita dor de cabeça!

Sub TESTE_1()
'Nesta a macro funciona perfeitamente, pois não faço menção a variável "resultado" da linha 5
'E sim a conotação Cells(2, 1) na linha 7. (OBS: inserido em A1=4 em B1=5, valor obitido em A2: 4)

Maior = WorksheetFunction.Max(Cells(1, 1), Cells(1, 2))
Menor = WorksheetFunction.Min(Cells(1, 1), Cells(1, 2))

Valor1 = Cells(1, 1)
Valor2 = Cells(1, 2)
Resultado = Cells(2, 1)

If Maior > 3 Then
Cells(2, 1) = Valor1
End If

End Sub

Sub TESTE_2()
'Nesta a macro NÃO funciona, pois faço menção a variável "resultado" na linha 7. (OBS: inserido em A1=4 em B1=5, valor obitido em A2: empty ou seja "nada")

Maior = WorksheetFunction.Max(Cells(1, 1), Cells(1, 2))
Menor = WorksheetFunction.Min(Cells(1, 1), Cells(1, 2))

Valor1 = Cells(1, 1)
Valor2 = Cells(1, 2)
Resultado = Cells(2, 1)

If Maior > 3 Then
Resultado = Valor1
End If

Alguém pude me ajudar a dizer porque não funciona a macro "Teste_2"
Muito obrigado