保存副本后,excel vba代码消失了

时间:2017-09-08 09:27:11

标签: excel-vba vba excel

我有一个模板,我们的工作人员可以在其中填写数据,然后该文件应保存为新文件,其中包含我的模板中的原始宏 但这似乎不起作用。始终在新文件中删除代码。 该模板也应该保存,因为其中的编号必须与创建的每个新文件一起使用。

有人知道解决方案吗?

Public Sub OpslBestand()
On Error Resume Next
Book1_BeforeSave
SavePdfEmail
Dim NieuwRet As Variant
ActiveWorkbook.Sheets.Copy  
NieuwRet = "P:\Retourformulieren\Excel\" & Range("L2").Value & "-JL-" & Format(Date, "YYYYMMDD") & "-" & Range("Klant").Value
ActiveWorkbook.SaveAs NieuwRet, FileFormat:=xlOpenXMLWorkbookMacroEnabled
ActiveWorkbook.Close
VolgRet
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub

1 个答案:

答案 0 :(得分:1)

如果将文件另存为.xlsx,则会删除该宏。您需要将文件另存为.xlsm(启用宏)。