ExtendingInsensibility into Code modules. Copy table contents to VBIDE VB Editor code modules. ..

**DocAElstein** · 12-26-2018, 04:43 PM

Spare Post for misc. notes

Before doing this, select File > Options > Trust Center > Trust Center Settings... > Macro Settings.
Make sure that the check box 'Trust access to the VBA project object model' is ticked, then click OK.

Use the following as starting point and edit it as you like.

Code:

Sub CreateXLSM()
    Dim wbk As Workbook
    Dim vbc As Object ' VBComponent
    Dim mdl As Object ' CodeModule
    Set wbk = Workbooks.Add(xlWBATWorksheet)
    Set vbc = wbk.VBProject.VBComponents.Add(1) ' vbext_ct_StdModule
    Set mdl = vbc.CodeModule
    mdl.AddFromString _
        "Sub Test()" & vbCrLf & _
        "    MsgBox ""Hello World!"", vbInformation" & vbCrLf & _
        "End Sub"
    wbk.SaveAs Filename:="Test.xlsm", FileFormat:=xlOpenXMLWorkbookMacroEnabled
    wbk.Close
End Sub

https://eileenslounge.com/viewtopic.php?f=30&t=36283