「再計算したらマクロを実行する(Ver.7)」

Excel2002で作ったものだが、本来Excel5/95(Ver.5/7)用の骨董品です。
Excel5/95(Ver.5/7)には、Calculateイベントプロシージャがないので、類似のことをするにはOnCalculateを使います。

Public Sub Auto_Open()
    Worksheets("Sheet1").OnCalculate = "RunOnCalculate"
End Sub

Public Sub Auto_Close()
    Worksheets("Sheet1").OnCalculate = ""
End Sub

Private Sub RunOnCalculate()
    MsgBox ActiveCell.Address, vbInformation
End Sub

今更、使い道はないと思うけど…。
場合によっては、OnEntryでコピペやDELによる値のクリアには反応しない分を補完するために使えるかも。

[Mr.BelieのページのHomeへ]