[[20050329114606]]　『文字入力した計算式を数式とみなして答えを出した』（プチ）　ページの最後に飛ぶ

『文字入力した計算式を数式とみなして答えを出したい』（プチ）

たとえば、A1のセルに「1/2×(0.35+0.79)×1.45×2×18.00」と入力し、

F1のセルに答えを算出したい場合、入力した式を計算式と見なし答えを出す方法はないですか？

今のところ、面倒ですが1つのセルに1文字づつ入力し、F1のセルにROUNDで答えを出してるのですが、その時によって式が変わるのでとっても面倒なんです。

どなたか教えて下さい。
エクセル2000、Windows2000です。

 ユーザー定義関数ですが。
 標準モジュールに貼り付けて、=MYFX(A1,2)　などとして使います。
　
Public Function MYFX(Target As Range, Keta As Integer) As Variant
        MyVal = Replace(Target, "×", "*")
        MyVal = Replace(MyVal, "÷", "/")
        MyVal = Replace(MyVal, "{", "(")
        MyVal = Replace(MyVal, "}", ")")
        MyVal = Replace(MyVal, "＝", "")
        MyVal = Replace(MyVal, "π", "PI()")
        MyVal = Replace(MyVal, "√", "SQRT")
        MyFx = Application.Round(Application.Evaluate(MyVal), Keta)
End Function

 （川野鮎太郎）

早速のお返事ありがとうございます。

一度チャレンジしてみますが、標準モジュールってなんですか？（おばかな質問ですいません）

 ALTキー押しながらF11キーを押してVBEの画面を開き、挿入＞標準モジュールとしてください。
 出てきた白い画面に上記のコードを貼り付けます。

 （川野鮎太郎）

あぁぁ！解りましたぁ！ほんとにありがとうございます。さっそくやってみます。

できました！すごい！素人の私にはかなり感動です！ありがとうございます！

コメント返信：

[ 一覧(最新更新順) ]

[[20050329114606]] 『文字入力した計算式を数式とみなして答えを出した』（プチ） ページの最後に飛ぶ

[[20050329114606]]　『文字入力した計算式を数式とみなして答えを出した』（プチ）　ページの最後に飛ぶ