VBAである領域で虚数になる関数の積分
VBAを使って、
ある領域で虚数あるいはマイナス無限大になる関数f(x)の実数領域だけで積分を行いたいのですが
どうすれば良いですか？
dx = R / 500 '積分領域の設定
y = 0
For i = 0 to 500
x = i * dx
If f(x) > 0 Then
y = y + f(x) * dx
End if
Next
Cell(1,1) = y
としても、
If f(x) > 0 Then
のところで、虚数とかマイナス無限大が出てくるとエラーになって
計算が前に進みません。
If f(x) <> voidとかも試してみましたが
うまくいきませんでした。
どうすれば、虚数とかマイナス無限大以外の部分を積分することが出来ますでしょうか？
お礼
ありがとうございます。