エクセルで掛け算

質問

こんなツールボタンありますか？
・１つのセルに＝を入れずに掛け算の式を入力します。
　例えば「１３＊９」と入れます。
・その後、あるツールボタンをクリックするとダイアログボックスが出て、そこに答えが表示されます。
・エンターキーを押すと掛け算の式が入力されているセルに答えが表示されます。

説明がわかりにくいかも知れませんが、ご存知のかたがいらっしゃったら教えてください。
WinXP　office2002　です。よろしくお願いします。

回答No.2

BLUEPIXY · ベストアンサー

マクロに以下を登録して（ツールボタンに登録して）、式のあるセルをアクティブセルにして実行
Public Sub eval()
Dim exp
exp = Evaluate(ActiveCell.Value)
MsgBox exp
ActiveCell.Value = exp
End Sub

お礼

ご回答ありがとうございます。できました！
会社のパソコンが購入しなおされてそのツールボタンがどこにあるか
わからなくなって困っていました。
きっと前任者がユーザー設定で作ったものだったんですね。
初心者なので助かりました。
ほんとうにありがとうございました。

回答No.3

imogasi

何でこんな複雑なことをする必要があるのか判らないので、質問を見て答えようとするものには不安があります。
１３＊９と入れると文字列で入力されたことになります。
＞こんなツールボタンありますか
こんな特殊なニーズに対しては、ないでしょう。
シートにコマンドボタンを１つ貼り付けます。
それをダブルクリックして出てくるVBEの画面に
Private Sub CommandButton1_Click()

End Sub
の真ん中に、下記のコードのうち、上記２行を除いた部分を貼り付ける
Private Sub CommandButton1_Click()
Application.EnableEvents = False
MsgBox Evaluate(ActiveCell.Value)
ActiveCell.Formula = "=" & ActiveCell
Application.EnableEvents = True
End Sub
を貼り付けて
１３＊６など入ったセルをアクチブにして、ボタンをクリックすると
メッセージボックスに答えが出て
答えに変わります。
１２＊３＊４なども可能でした。

お礼

ご回答ありがとうございました！
＞何でこんな複雑なことをする必要があるのか判らない
会社で使っているのですが、最初に演算式（＝なし）を１列に１００程入力し、
印刷しなければならないのです。
その後、各答えを出して合計するのですが、１００もある式にいちいち＝を
再入力するのが大変なので質問させていただきました。
先日まで使っていたパソコンにはその便利なボタンがあったので
標準のボタンかと思っていましたが、前任者が作ったものだったんですね。
ありがとうございました。

回答No.1

BLUEPIXY

=13*9とここまで入力してＦ９キーを押すと計算結果で置き換えられます。

お礼

さっそくのご回答ありがとうございます。
すみませんが、どうしても「＝」を入力したくないので他の方の方法を試してみたいと思います。
ありがとうございました。