I am using this code to save a workbook with all the macros, but the new saved document is saved without the module and userform.

ActiveWorkbook.SaveAs Filename:= _
    "E:\DATA\EXCEL\CD Lys\CD List " & Format(Now, "yyyy-mm-dd") & ".xlsm", FileFormat:= _
    xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
Please help with correct code