ThisWorkbook 1

[WaterSprite]

Is there a way to progmatically enter code into the "ThisWorkbook" module. Instead of typing Macro30 in the module, or doing a manual copy and paste, can I write code that will do so.

Or, is there code that handles the COMMENT BLOCK, UNCOMMENT BLOCK.

 

[combo]

You need a reference to 'Microsoft Visual Basic for Applications Extensibility 5.3' and programmatic access to vba project (xp+ versions). Example of programmatic access to the code:

With ThisWorkbook.VBProject.VBComponents("ThisWorkbook").CodeModule
    MsgBox .Lines(1, .CountOfLines)
End With

combo

 

[WaterSprite]

Thanks for the tip. I figured out a different solution to the problem I had. However, the library thing is something I need to check out with my computer at work. Thanks again.