VBA/Excel/Access/Word/Application/Immediate Window

Материал из VB Эксперт
Перейти к: навигация, поиск

Clear immediate window

 
Sub ImmediateWindowClear()
   Application.VBE.Windows.Item("Immediate").SetFocus
   Application.SendKeys "^a"
   Application.SendKeys "{del}"
End Sub