[[20041023182431]]　『電卓みたいな計算..』（ユーミン）　ページの最後に飛ぶ

『電卓みたいな計算..』（ユーミン）

こんばんわ。拝見させていただいて私も挑戦いたしましたが
なぜかうまくいきません。
Alt+F11で挿入－標準モジュ-ル　で下記のコードを貼り付け、でもう一度エクセルの画面にもどしてマクロ（M)　－　マクロ（M)　でマクロ名と出ますが何も記入されて無く
実行ボタンが黒字になりません。
VBA初心者の為、どなたか詳しく教えていただけませんでしょうか？

Private Sub Worksheet_Change(ByVal Target As Range)

    Dim inp, outp As String
    inp = "$A$1"
    outp = "E1"
    Application.EnableEvents = False
    If Target.Address = inp Then
        Range(outp).Value = Range(outp).Value + Target.Value
        If Target.Value <> "" Then
            ActiveCell.Offset(-1, 0).Select
        Else
           Range(outp).Value = 0
        End If
    End If
    Application.EnableEvents = True
 End Sub

ごめんなさい　うまくいきました。

 自己解決されているようですが、
 みやほりんが 記事補足を目的に 2006/02/10 15:00 ごろ、投稿しました。
 トピ主の[ユーミン]さんの投稿は2004/10/23 18:24:31でした。
　
【元となったトピック】
[[20020530145644]] 『電卓みたいな計算できますか?』(事務員です) 
なぜうまくいかなかった原因もkazu校長先生のコメント中で解説されています。
　
【関連ログ】
↓に類似の過去ログのリストがあります。
[[20041020105248]] 『同一セル内での計算と内訳表示』（tasuketeman）
 (みやほりん)(-_∂)b

コメント返信：

[ 一覧(最新更新順) ]

[[20041023182431]] 『電卓みたいな計算..』（ユーミン） ページの最後に飛ぶ

[[20041023182431]]　『電卓みたいな計算..』（ユーミン）　ページの最後に飛ぶ