会计分录怎么解决，首次发贴！

v111v111v

对vba还是不会用，下面的问题请教兰色老师和大家：
If Target.Address <> "$L$3" Then Exit Sub
Dim Arr, i&, Brr(1 To 5000, 1 To 9), j&
Dim d, t

第一，这句代码中"$L$3" ，看着不太好看，怎么修改一下位置a1,
第二，如果改了，整个表的change事件就不动了。有没有好的办法
第三，能不能把代码加上个说明，我们看起来也容易一些。
第四，会计分录还没人做出来，我新手是不是太不自量力了。
说明，这些代码也是兰色老师的原创，我只是稍微动了一下，用着实用。
附件在下面。终于发了一个帖子。

v111v111v

星期天，高手呢