VBA保存excel表格，包括其宏

Question

我想编写一个宏来保存新工作簿上的工作表，包括此工作表中的宏。 但我失败了，新工作簿是一个启用宏的工作簿，但里面的按钮正在对原始文件中的宏进行处理： - （

如何在新工作簿中复制宏？ 要复制的宏称为“my_macro”

以下是我目前使用的失败代码：

Sub aSaveout()

Sheets("mysheet").Select
ActiveSheet.Copy
'ThisFile = Range("A1").Value
ActiveSheet.SaveAs Filename:="mysheet.xlsm", FileFormat:=52
Application.ScreenUpdating = True
ActiveWorkbook.Close

End Sub

由于

Answer 1

感谢您的参与＆gt;  Jeeped是对的，activeX Control可以工作并导出到新保存的文件。