Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna um Double especificando o cosseno de um ângulo.
Sintaxe
Cos(number)
O argumentodo número necessário é uma expressão Double ou qualquer expressão numérica válida que expressa um ângulo em radianos.
Comentários
A função Cos usa um ângulo e retorna a proporção de dois lados de um triângulo retângulo. A razão é o comprimento do lado adjacente ao ângulo dividido pelo comprimento da hipotenusa. O resultado está no intervalo de -1 a 1.
Para converter graus em radianos, multiplique graus por pi/180. Para converter radianos em graus, multiplique radianos por 180/pi.
Exemplo
Este exemplo usa a função Cos para retornar o cosseno de um ângulo.
Dim MyAngle, MySecant
MyAngle = 1.3 ' Define angle in radians.
MySecant = 1 / Cos(MyAngle) ' Calculate secant.
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.