[[20050211090552]] 『計算式の表示と答えの表示』(やす) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『計算式の表示と答えの表示』(やす)

1つのセルには計算式をいれて、隣のセルには答えが出るようにしたいのですが教えていただけますか。


 ユーザー定義関数ですが。
 標準モジュールに貼り付けて、 =MyFx(A1) などとして使います。※A1に式を入れた場合。
 ただしエクセルで計算できる式にしてください。
 例)100*100 ←10000 OK
   100×100 ←エラー NG
 
Public Function MyFx(Target As Range) As Double
If Target <> "" Then
    MyFx = Application.Evaluate(Target.Value)
End If
End Function

 ※100×100形式にしたい場合は置換え処理を組み込むことになります。

 (川野鮎太郎)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.