Change Code Windows

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I am using the following code to set certain parameters on my code windows:

Dim cmpComponent As VBIDE.VBComponent
Dim cmpComponents As VBIDE.VBComponents
Dim cmpName As String
Dim xx As Integer
Set cmpComponents = ThisWorkbook.VBProject.VBComponents

For Each cmpComponent In cmpComponents
cmpName = ThisWorkbook.VBProject.VBComponents(cmpComponent.Name).Name

ThisWorkbook.VBProject.VBComponents(cmpName).CodeModule.CodePane.Window.Top =
12
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top