Descrição:
A função Cos
em VBA é utilizada para calcular o cosseno de um ângulo especificado em radianos. Ela retorna o valor do cosseno desse ângulo. Essa função é amplamente utilizada em cálculos trigonométricos e é uma das funções trigonométricas fundamentais.
Exemplos:
Sub ExemploCos1()
Dim angulo As Double
angulo = 0.5 ' Ângulo em radianos
MsgBox "O cosseno de " & angulo & " radianos é " & WorksheetFunction.Cos(angulo)
End Sub

Neste exemplo, a função Cos
é utilizada para calcular o cosseno de 0.5 radianos.
Sub ExemploCos2()
Dim angulo As Double
angulo = WorksheetFunction.Pi / 3 ' Ângulo de 60 graus em radianos
MsgBox "O cosseno de " & angulo & " radianos é " & WorksheetFunction.Cos(angulo)
End Sub
Neste exemplo, a função Cos
é utilizada para calcular o cosseno de 60 graus (equivalente a π/3 radianos).