VBAを使ってsinh,coshを使いたい。

Question

前提・実現したいこと

VBAを用いて下記URLに示す四探針法の計算に必要なRCF（抵抗率補正係数）を求めたいです。
で、そのプログラムを書いているとsinhのプロパティが取得できないといわれています。
どうすればいいでしょうか。
また、余裕があればΣで無限大まで飛ばすプログラムの書き方も教えてほしいです。

http://www.keisokuki-world.jp/user_data/files/MCP.pdf
ここに質問の内容を詳しく書いてください。
（例）PHP(CakePHP)で●●なシステムを作っています。
■■な機能を実装中に以下のエラーメッセージが発生しました。

発生している問題・エラーメッセージ

エラーメッセージ
```WorksheetFunctionクラスのCoshのプロパティが取得できません。

### 該当のソースコード

```ここに言語名を入力
ソースコード
P1 = 2 / Cells(2, 10).Value * Arg8 * WorksheetFunction.Sinh(Cells(2, 11).Value * Arg8)```

### 試したこと

ここに問題に対して試したことを記載してください。

### 補足情報（FW/ツールのバージョン**ボールドテキスト**

ここにより詳細な情報を記載してください。
### 前提・実現したいこと

ここに質問の内容を詳しく書いてください。
（例）PHP(CakePHP)で●●なシステムを作っています。
■■な機能を実装中に以下のエラーメッセージが発生しました。

### 発生している問題・エラーメッセージ

エラーメッセージ

### 該当のソースコード

```ここに言語名を入力
ソースコード

試したこと

ここに問題に対して試したことを記載してください。

補足情報（FW/ツールのバージョンなど）

ここにより詳細な情報を記載してください。

Comments

[hatena19]

テンプレートに最初から記述してあるサンプル部分で不必要な部分は削除してください。読みづらいです。

[ttyp03]

「プロパティが取得できない」とはどういうことでしょうか。関数がない？エラーなる？具体的に出力されるメッセージなどを書いてください。あと余計なテンプレートを削除してください。

Answer 1

普通に使えるはずだが。

WorksheetFunction.Sinh メソッド (Excel)

WorksheetFunction.Cosh メソッド (Excel)

エラーがでる実際のコードとエラーが出る行、正確なエラーメッセージを提示してください。

検証

Excel の VBA なら、 WorkSheetFunction.Sinh、WorkSheetFunction.Cosh が使えるはず。
それ以外のアプリ（Word, PowerPoint, Access等）だとExcelオプジェクトを開いて上記の関数を呼び出せすことになる。

イミディエイトウィドウで検証してみた。

x=700
?WorkSheetFunction.Sinh(X)
 5.07116027367502E+303 
?(Exp(X) - Exp(-X)) / 2
 5.07116027367502E+303 

x = 710
?WorksheetFunction.Sinh(X)
 '実行時エラー'1004': WorksheetFunctionクラスのSinhプロパティを取得できません。
 
?(Exp(X) - Exp(-X)) / 2
 '実行時エラー'6': オーバーフローしました。

関数の結果が倍精度浮動小数点数の範囲を超えている（オーバーフロー）エラーだと思われる。

Answer 2

VBAのヘルプにある「超越関数」を参照して、Sinh・Coshを自作してはどうでしょうか？

それで上手くいけば良いですし、
上手くいかない場合でもどこでエラーになるのか、何が原因かを特定しやすくなるでしょう。

Answer 3

単なる関数の限界でしょう？
Cosh,Sinh に710以上の値を渡すと、ご提示のエラーが出ました。

また、時間的に余裕は無いので、
自分で色々と考えてみてください。

Answer 4

VBA は三角関数は用意されていますが、双曲線関数（sinh, cosh, tanh）は持っていません。
ですので双曲線関数の定義

sinh(x) = (e^x - e^(-x)) / 2
cosh(x) = (e^x + e^(-x)) / 2

を用いて、演算する必要があります。
※e は指数関数で、VBA では Exp() 関数となります

Answer 5

sinh coshは、(指数関数を使って）自分で定義する。