This is the code I used to add to another module, in case anyone wants to see how I am currently doing it.
Set VBProj = Application.ActiveWorkbook.VBProject 'CREATES NEW MODULE FOR NEW WORKBOOK
Set VBComp = VBProj.VBComponents.Add(vbext_ct_StdModule)
VBComp.Name = "NewModule"
Set VBProj = Application.ActiveWorkbook.VBProject
Set VBComp = VBProj.VBComponents("NewModule")
Set CodeMod1 = VBComp.CodeModule
With CodeMod1
LineNum = .CountOfLines + 1
.InsertLines LineNum, "Sub crtRRP()"
.InsertLines LineNum, "End Sub"
Bookmarks