excel 函数 和 宏 的自动执行

最近急学急用VBA，想用EXCEL实现逻辑处理。
学习了使用宏和函数编程，但现在有一个问题。
举例，设A1单元格的数字是6，我编了一个宏或函数在A2，其作用是取A1的平方，运行正常，A2显示36，可是当A1的数字更改为5时，A2的数并没有更改~，只有重新载A2的函数或再次运行此宏，A2才变成25。
有没有方法，让宏 或 函数能够像使用SUM函数一样，能根据自变量的变化而变化，需要加入什么样的语句呢？
谢谢高手指教。
我知道在A2中输入”＝A1*A1“是可以的，但我使用此功能是为了实现更复杂的逻辑判断，此处只是举例，还望指教！

'计算选项-〉设置“自动重算”
'模块中添加代码
Function a(r As Range)
a = r.Value * r.Value
End Function
'单元格中输入函数=a(A1)

1. 函数都是一打开excel文件就执行； 2. 如果打开文件函数不执行，那么你将看不到函数公式的结果，显然这是不可能的事情。

想确实学好函数 宏的话，建议买本书好好系统学习下。

要用Change事件来实现，把下列代码复制到你要实现此功能的工作表VBA窗口中 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then Target.Offset(0, 1) = Target * Target End If End Sub