Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


58962 / 76732 ←次へ | 前へ→

【22486】ichinose さん お願いします
質問   E-MAIL  - 05/2/22(火) 19:22 -

引用なし
パスワード
   すいません
またまた質問ですが、
教えていただいた方法で謎は解けたのですが・・・
その出した答えを計算させようと思い『=Keisan()』
を作ったのですが、どうせだったら一緒に処理させようと思い

    A       B      C
1 幅0.2*長さ0.5 =del_wide(A1) =Keisan(B1)
2 幅0.2*長さ0.5 =KeisanT(A2)

考えてみたのですが、分かりませんでした。 

ちなみにセルC1の=Keisan(B1)の処理は下記のとおりです。
'---------------------------------------------------------------
Function Keisan(算出式, 四捨五入桁数) As Double
  If TypeName(算出式) = "Range" Then
    計算値 = 算出式.Value
  End If
  Keisan = Evaluate(計算値)
  Keisan = Round(Keisan, 四捨五入桁数)
End Function
'---------------------------------------------------------------
上記の方法と教えていただいた方法は合成出来ないのでしょうか?
よろしくお願いします。
2 hits

【22439】文字のみ削除するにはどうしたらよいのでしょうか? 05/2/20(日) 23:30 質問
【22440】Re:文字のみ削除するにはどうしたらよいの... ichinose 05/2/21(月) 0:11 回答
【22473】Re:文字のみ削除するにはどうしたらよいの... 05/2/22(火) 11:20 お礼
【22486】ichinose さん お願いします 05/2/22(火) 19:22 質問
【22506】評価式の値を算出 ichinose 05/2/23(水) 0:23 発言
【22509】Re:評価式の値を算出 05/2/23(水) 8:59 お礼

58962 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free