Hi CBrine,
Based on your components, the following works

WB1.VBProject.VBComponents.Item("sheet4").CodeModule.AddFromString (strCode)
so I just need to find determine the link between the Sheet# and the Name. Project Explorer shows two name values for a Sheet module
MD