Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9331 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【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でする場合、どのような式にすればいいのでしょうか？
>教えてください。
ＶＢＡの関数にもSin、Cos,Tanはあります。
又、ワークシート関数の中にも以下のような記述方法で
ＶＢＡのコード内で使用できるものもあります。
以下のコードを実行して下さい。


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は、高校時代は暗記してたような記憶があります。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9331 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free