VBA/Excel/Access/Word/Excel/Watch
Версия от 19:33, 26 мая 2010; (обсуждение)
Add watch
<source lang="vb">
Sub AddWatch()
With Application .Range("A1").Formula = 1 .Range("A2").Formula = 2 .Range("A3").Formula = "=Sum(A1:A2)" .Range("A3").Select .Watches.Add Source:=ActiveCell End With
End Sub
</source>