Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


9329 / 13644 ツリー ←次へ | 前へ→

【27898】三角比 もしもし 05/8/23(火) 18:32 質問[未読]
【27899】Re:三角比 ichinose 05/8/23(火) 18:47 発言[未読]
【27912】Re:三角比 もしもし 05/8/24(水) 8:46 お礼[未読]
【27935】Re:三角比 ichinose 05/8/24(水) 18:57 発言[未読]
【27958】Re:三角比 もしもし 05/8/25(木) 12:04 回答[未読]
【27989】Re:三角比 ichinose 05/8/25(木) 23:31 発言[未読]

【27898】三角比
質問  もしもし  - 05/8/23(火) 18:32 -

引用なし
パスワード
   sin,con,tanθの求め方を教えて頂きたいです。
関数だと、例えば=TAN(45PI()/180),=TAN(RADIANS(45))で求められますよね。
これと同じ事をVBAでする場合、どのような式にすればいいのでしょうか?
教えてください。

【27899】Re:三角比
発言  ichinose  - 05/8/23(火) 18:47 -

引用なし
パスワード
   ▼もしもし さん:
こんばんは。

>sin,con,tanθの求め方を教えて頂きたいです。
>関数だと、例えば=TAN(45PI()/180),=TAN(RADIANS(45))で求められますよね。
>これと同じ事をVBAでする場合、どのような式にすればいいのでしょうか?
>教えてください。
VBAの関数にもSin、Cos,Tanはあります。
又、ワークシート関数の中にも以下のような記述方法で
VBAのコード内で使用できるものもあります。
以下のコードを実行して下さい。


Sub test()
  Dim pi As Double
  pi = WorksheetFunction.pi()
  MsgBox Tan(1 / 4 * pi)
  MsgBox Tan(WorksheetFunction.Radians(45))
End Sub

【27912】Re:三角比
お礼  もしもし  - 05/8/24(水) 8:46 -

引用なし
パスワード
   ▼ichinose さん:
>Sub test()
>  Dim pi As Double
>  pi = WorksheetFunction.pi()
>  MsgBox Tan(1 / 4 * pi)
>  MsgBox Tan(WorksheetFunction.Radians(45))
>End Sub
返信が遅くなりましてすません。
上記をヒントにできました。
最後の行はエラーになって分かりませんでしたが、
関数と同じように
Tan(30*pi/180)で結果が得られました。
ありがとうございました。

【27935】Re:三角比
発言  ichinose  - 05/8/24(水) 18:57 -

引用なし
パスワード
   ▼もしもし さん:
こんばんは。
解決されたようなので
もう見ていないかもしれませんが・・・。

>>Sub test()
>>  Dim pi As Double
>>  pi = WorksheetFunction.pi()
>>  MsgBox Tan(1 / 4 * pi)
>>  MsgBox Tan(WorksheetFunction.Radians(45))
>>End Sub
>上記をヒントにできました。
>最後の行はエラーになって分かりませんでしたが、
どんなエラーで止まりましたか?
Excelのバージョンは?
Excel2002では正常に作動していますが・・・。
もし見ていたら教えてください。

>関数と同じように
>Tan(30*pi/180)で結果が得られました。
もっとも私も三角関数は↑この記述ですけど・・・。


>ありがとうございました。

【27958】Re:三角比
回答  もしもし  - 05/8/25(木) 12:04 -

引用なし
パスワード
   ▼ichinose さん:
>>最後の行はエラーになって分かりませんでしたが、
>どんなエラーで止まりましたか?

私の入力ミスだったようです。すみません。
最後まで見ていただいてありがとうございます。
(ちなみに2003でした。)

で、教えていただいた中のTan(1 / 4 * pi)は
どういう意味があるのでしょうか?
常に"1"を返すのですか?
三角比なんて忘れていたので頭が???です。
よければ、勉強のために!

【27989】Re:三角比
発言  ichinose  - 05/8/25(木) 23:31 -

引用なし
パスワード
   ▼もしもし さん:
こんばんは。
>
>で、教えていただいた中のTan(1 / 4 * pi)は
>どういう意味があるのでしょうか?
タンジェントの意味ですか?
これは、Googleで「三角関数」で検索してみて下さい。

1/4*Piは45度をラジアンに変換した値、つまり定数です
(Piはπですから)。
よって
>常に"1"を返すのですか?
はい、返します。
Tan(1/4π)=1は、高校時代は暗記してたような記憶があります。

9329 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free