エクセルで、１つのセルで上書き足し算できますか？

質問

こんばんは　パソコン初心者です。お時間があったらお答えをおねがいします！たとえばエクセルで１つのセルに１０と入力しておいて、そのあと５を足し算したいときに、
他のセルを使わないで、その１０と入力してあるセルに、上書きのようなかたちで簡単に足し算できないでしょうか？
（１０、のあと５、エンター、で足し算完了のような。。。）
実際はもっと長い数字なのですが、いまは先に計算しておいて入力してます。。。簡単にできたらいいなぁと思っています。

回答No.3

Wendy02 · ベストアンサー

こんばんは。

私が、数年前、初めて出合った不思議なマクロですね。今でこそ、このマクロは、自分で作れるようになりましたが、このレベルにはなかなか到達しませんでしたね。

ただ、これは、画面のちらつきが気になります。

シートタブを右クリックで、コードの表示で以下を貼り付けます。

Private Sub Worksheet_Change(ByVal Target As Range)
　 Dim myValue As Double
　 Dim preVAlue As Double
　　'セルは、A1
　 If Target.Address <> "$A$1" Then Exit Sub
　 With Application
　　　.EnableEvents = False
　　　.ScreenUpdating = False
　　　If VarType(Target.Value) = vbDouble Then
　　　　 myValue = Target.Value
　　　　 .Undo
　　　　 preVAlue = Target.Value
　　　　 If VarType(preVAlue) = vbDouble Then
　　　　　　Target.Value = myValue + preVAlue
　　　　　　Else
　　　　　　Target.Value = myValue
　　　　 End If
　　　End If
　　　.ScreenUpdating = True
　　　.EnableEvents = True
　 End With
End Sub

お礼

マクロで作るんですね！まだ試したことがないのですが、やってみます（＾－＾）ありがとうございました

回答No.2

noname#204879

「他のセルを使わないで」なら、出来ません。

お礼

とりあえずできそうなことをやってみますね。「他のセルを使わないで」にこだわらなくていいのかも。。。と思いました
ありがとうございました（＾－＾）

回答No.1

kernel_kazzz

セルに計算式で入力するだけですね。

=10+5 enter

これで15と表示されますから。

お礼

やっぱりいちばん簡単なのはこれでしょうか。ありがとうございました（＾－＾）