VBE Automation question

N

nkaposhilin

Hi,



I have the following code in regular mdule in Excel 2000 that is
supposed to automatically create some event procedures in a new workbook
that is being programatically created. The code runs fine but it opens
the VBE environment and flashes all the windows as the code is created.
I have set Application.ScreenUpdates to false already. Anyone have a
clue how I can prevent these VBE windows from opening at runtime.



Kind Appreciation to anyone who can help.



With tmpWorkbook.VBProject.VBComponents(report.CodeName).CodeModule

sts = .CreateEventProc("click", "CommandButton1")

Line = .ProcStartLine("CommandButton1_Click", vbext_pk_Proc)

.InsertLines Line + 1, "Essbase.RunReports
ActiveSheet.Range(" & """" & CascadeCell & """" & ").Value,
""A6"", 2"

End With

With
tmpWorkbook.VBProject.VBComponents(report.CodeName).CodeModule

sts = .CreateEventProc("click", "ComboBox1")

Line = .ProcStartLine("ComboBox1_Click", vbext_pk_Proc)

.InsertLines Line + 1, "sts = Essbase.Retrieve(True)" &
Chr(10) & _

"lblReportTitle.Caption = ""HEAD OFFICE REPORT FOR "" &
Range(""HOREPORT_PAGEHEADER3"").Value"

End With
 

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

Similar Threads

Programmatically removing code from ThisWorkbook XL2007 2
Subscript out of range 7
getting text out of TextBox into code 0
Dynamic VBA for dynamic Forms 0
Don't open vb editor 1
Error when Execute New Procedure Created Using VBE 4
VBE tricky question 2
Creating ThisWorkbook Event Procedures 2

Top