On 6/30/2016 12:50 PM, Tim Childs wrote:
Hi
I have used the code below to close the extra VB windows that end up
being open when using the VBA editor.
Sub CloseVBEWindows()
Dim W As VBIDE.Window
ThisWorkbook.VBProject.VBE.MainWindow.SetFocus
For Each W In Application.VBE.Windows
If W.Type = vbext_wt_CodeWindow Or W.Type = vbext_wt_Designer Then
If Application.VBE.ActiveWindow.Caption < W.Caption Then
W.Close
End If
End If
Next W
End Sub
It works fine on a 64-bit laptop running Windows 10 and Excel 2010.
When I run it on a 64-bit laptop with windows 7 and Excel Professional
Plus I get the error 424 (object required) at the following line:
If W.Type = vbext_wt_CodeWindow Or W.Type = vbext_wt_Designer Then
The extensibility library 5.3 has been set in references.
Can anyone suggest a possible solution, please
Many thanks
Tim

What happens if you do this?
Dim W as Object