[[20150407141114]]　『VBAで計算式の答の出し方』（ムギ）　ページの最後に飛ぶ

『VBAで計算式の答の出し方』（ムギ）

EXCELで

A1セルに　A=((17.15+15.44)÷2)×20
　　　　　　　　　　↑
　　　　　　表示したままにしたい。

B1セルに　答（325.9）が出るようにする。

以降、連続してやっていきたいのですが
わかる方教えていただきたいです。

以前教えて頂いたのですが忘れてしまいました。
すいません。

宜しくお願いします。

＜使用 Excel：Excel2013、使用 OS：Windows8 ＞

 これですか？？
（稲葉） 2015/04/07(火) 14:37

前に似たようなのがあった気がします。
[[20150330193124]]

複数存在するとしてA列が計算式でB列が答えとして
βさんのを利用して

Function CalFromFormula(r As Range)

    CalFromFormula = Evaluate(Replace(Replace(r.Value, "×", "*"), "÷", "/"))
 End Function

としてB1に=CalFromFormula(A1)

（デイト） 2015/04/07(火) 14:48

ご回答有難うございます。
稲葉さんのVBAでできました。
有難うございました。

２乗とかもあるといいですね？
なんかできそうな気がします。

（ムギ） 2015/04/07(火) 15:50

コメント返信：