VBA保存包括macros在内的Excel表格

我想编写一个macros保存在一个新的工作簿,包括这张表中的macros的工作表。 但是我失败了,新的工作簿是一个启用了macros的工作簿,但里面的button正在接受原始文件上的macros:-(

如何在新的工作簿中复制macros? 要复制的macros被称为“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 

谢谢

感谢您的参与> Jeeped是正确的,activeX控件工作,并导出到新保存的文件。