如何用vba实现清空watch window？

Question

想法一：
Sub Clear_Watch_Window()
    thebook.wkbook.Application.VBE.Windows("Watches").SetFocus
    thebook.wkbook.Application.VBE.CommandBars(“Watch Window”).Controls("&Delete Watch").Execute
End Sub
运行了没有任何反应，焦点是有了，可是无法删除想法二：
调用菜单里的Clear，不过无法进入菜单thebook.wkbook.Application.VBE.CommandBars(1).Controls(“Edit”)后面没有下一层的control以及相应的exccute的方法请高手解答，谢谢

Answer 1

宏代码是这样  Application.Watches(i).Deletei是index或者
 Application.Watches(Workbooks("Book1").Sheets("Sheet1").Range("K22")).Delete

Answer 2

不行，不管我往watch window里放几个变量
Application.Watches.Count的返回始终是0，且
Application.Watches(i).Delete也不起作用继续呼唤答案

Answer 3

不行，不管我往watch window里放几个变量 
//
我倒~  你的watch window是ide里面察看变量值得那个？

Answer 4

原来我们说的不是一个watch window。
我指的是IDE里的，不是application下面的
所以我想用VBE下面的工具栏里面的命令去实现，是不是原理上不行？