Read_Mynd Posted March 14, 2012 at 10:23 PM Report #444011 Posted March 14, 2012 at 10:23 PM Boas tou a tentar programar em vb, ja consegui dar os primeiros passos, mas preciso de saber como escrever o sin-1, etc ja tentei arsin, Asin e não consigo nada, alguem sabe?
jpaulino Posted March 14, 2012 at 11:19 PM Report #444025 Posted March 14, 2012 at 11:19 PM Não entendi o que queres fazer.
pmg Posted March 14, 2012 at 11:28 PM Report #444026 Posted March 14, 2012 at 11:28 PM Math.Asin(0.5) What have you tried? Não respondo a dúvidas por PM A minha bola de cristal está para compor; deve ficar pronta para a semana. Torna os teus tópicos mais atractivos e legíveis usando a tag CODE para colorir o código!
Read_Mynd Posted March 15, 2012 at 02:41 PM Author Report #444066 Posted March 15, 2012 at 02:41 PM Não entendi o que queres fazer. quero fazer um calculo tipo este sen(x)=(cos(y)*sen(z))/cos(h), que no final vai dar x=arsen (cos(y)*sen(z))/cos(h), consegues perceber agora??? Pmg - isso vem eu rad certo?? como converto para graus? obrigado cumps
jmaocubo Posted March 15, 2012 at 03:41 PM Report #444069 Posted March 15, 2012 at 03:41 PM Experimenta gravar uma macro com os seguintes dados por exemplo: Célula A1: =cos(20) Célula A2: =sen(10) Célula A3: =sen(5) Célula B1: =ASEN((A1*A2)/A3) Célula B2: =Grau(B1) Na Célula B1 tens o valor do arcsen em radianos e na célula B2 tens o valor em Graus. Depois no VBA vê o código que te dá.... Cumprimentos,
Read_Mynd Posted March 15, 2012 at 04:31 PM Author Report #444071 Posted March 15, 2012 at 04:31 PM Obrigado. ao escrever grau b1 passa automaticamente de radianos para graus? Experimenta gravar uma macro com os seguintes dados por exemplo: Célula A1: =cos(20) Célula A2: =sen(10) Célula A3: =sen(5) Célula B1: =ASEN((A1*A2)/A3) Célula B2: =Grau(B1) Na Célula B1 tens o valor do arcsen em radianos e na célula B2 tens o valor em Graus. Depois no VBA vê o código que te dá.... Cumprimentos,
jmaocubo Posted March 16, 2012 at 02:25 PM Report #444207 Posted March 16, 2012 at 02:25 PM Sim, o valor da célula B1 passa de radianos para graus. cumprimentos,
Read_Mynd Posted March 16, 2012 at 06:12 PM Author Report #444279 Posted March 16, 2012 at 06:12 PM ok, obrigado
Read_Mynd Posted March 17, 2012 at 10:39 AM Author Report #444325 Posted March 17, 2012 at 10:39 AM estive a tentar e não consigo encontrar o código, não funciona com asin, ainda não consegui encontrar o código, alguém sabe??? Sim, o valor da célula B1 passa de radianos para graus. cumprimentos,
FreiNando Posted March 17, 2012 at 11:35 AM Report #444327 Posted March 17, 2012 at 11:35 AM O VBA tem as funções trignométricas (Sin, Cos e Tan), mas as funções trignométricas inversas, chamadas funções de arco, apenas tem o Atn. Se queres calcular as outras terá de ser formulas baseadas no Atn tipo: Arccos(x) = Atn(-x / Sqr(-x * x + 1)) + 2 * Atn(1) Arcsin(x) = Atn(x / Sqr(-x * x + 1)) Todas as funções trignométricas em VBA são em Radianos. Para converter graus de e para radianos tens de usar o PI: Graus= Radianos x 180 / PI Radianos = Graus x PI /180 O PI também não está definido no VBA. Mas quando usas o VBA no Excel, direta opu indiretamente, tens as funções trignométricas todas incluindo as conversões. Estas funçõers são acedidas em WorksheetFunction, nomeadamente: WorksheetFunction.Degrees(Radianos) WorksheetFunction.Radians(Graus) WorksheetFunction.Acos(Coseno) WorksheetFunction.Asin(Seno) WorksheetFunction.Pi() e muitas mais ... Nas folhas de calculo as funções têm nomes em português, mas em VBA eles são sempre em inglês. O caminho mais curto para conseguir fazer muitas coisas é fazer uma de cada vez. Samuel Smiles
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now