Type Info:
Output As Output
Dim OutputWindow As Output Set Output = Application.Windows.MultiViewBar.Output