Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > microsoft.public.excel.programming > #109032

Re: Error in VB Editor Coding

From GS <gs@v.invalid>
Newsgroups microsoft.public.excel.programming
Subject Re: Error in VB Editor Coding
Date 2016-06-30 19:44 -0400
Organization A noiseless patient Spider
Message-ID <nl4ati$h2i$1@dont-email.me> (permalink)
References <nl3t7i$t4$1@dont-email.me>

Show all headers | View raw


> 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

The ref is likely from your Win10 machine, perhaps?

Just curious why you need to close all the windows...

-- 
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
  comp.lang.basic.visual.misc
  microsoft.public.vb.general.discussion

---
This email has been checked for viruses by Avast antivirus software.
https://www.avast.com/antivirus

Back to microsoft.public.excel.programming | Previous | NextPrevious in thread | Next in thread | Find similar | Unroll thread


Thread

Error in VB Editor Coding Tim Childs <tsnip1NOTTHIS@yahoo.co.uk> - 2016-06-30 20:50 +0100
  Re: Error in VB Editor Coding GS <gs@v.invalid> - 2016-06-30 19:44 -0400
  Re: Error in VB Editor Coding Mike S <mscir@yahoo.com> - 2016-06-30 17:41 -0700
  Re: Error in VB Editor Coding "Peter T" <askformy@gmail.com> - 2016-07-01 19:01 +0100
    Re: Error in VB Editor Coding Tim Childs <tsnip1NOTTHIS@yahoo.co.uk> - 2016-07-02 18:48 +0100
      Re: Error in VB Editor Coding GS <gs@v.invalid> - 2016-07-02 18:38 -0400
        Re: Error in VB Editor Coding Tim Childs <tsnip1IgnoreThis@yahoo.co.uk> - 2016-07-03 05:11 +0100
          Re: Error in VB Editor Coding GS <gs@v.invalid> - 2016-07-03 00:16 -0400
            Re: Error in VB Editor Coding "Peter T" <askformy@gmail.com> - 2016-07-03 17:02 +0100
              Re: Error in VB Editor Coding GS <gs@v.invalid> - 2016-07-03 14:49 -0400
                Re: Error in VB Editor Coding GS <gs@v.invalid> - 2016-07-03 16:38 -0400
                Re: Error in VB Editor Coding "Peter T" <askformy@gmail.com> - 2016-07-04 11:31 +0100
                Re: Error in VB Editor Coding GS <gs@v.invalid> - 2016-07-04 06:39 -0400
                Re: Error in VB Editor Coding GS <gs@v.invalid> - 2016-07-04 06:41 -0400
                Re: Error in VB Editor Coding "Peter T" <askformy@gmail.com> - 2016-07-04 12:18 +0100
                Re: Error in VB Editor Coding GS <gs@v.invalid> - 2016-07-04 07:23 -0400
                Re: Error in VB Editor Coding "Peter T" <askformy@gmail.com> - 2016-07-04 12:49 +0100
                Re: Error in VB Editor Coding GS <gs@v.invalid> - 2016-07-04 09:20 -0400
      Re: Error in VB Editor Coding "Peter T" <askformy@gmail.com> - 2016-07-03 16:37 +0100
        Re: Error in VB Editor Coding Tim Childs <tsnip1NOTTHIS@yahoo.co.uk> - 2016-07-03 22:02 +0100

csiph-web