VBA保存包括其宏的Excel表格

我想編寫一個宏將表格保存在包含此表格中宏的新工作簿中。但我失敗了，新工作簿是一個啓用宏工作簿，但裏面的按鈕reffering於採用原始文件:-(VBA保存包括其宏的Excel表格

我怎樣才能複製宏在新工作簿？宏宏要複製被稱爲「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

感謝

來源

2015-08-20 Vincent

爲什麼不'ThisWorkbook.SaveAs'？ –

Try FileFormat：= xlOpenXMLWorkbookMacroEnabled – MatthewD

如果您正在討論分配給ActiveX按鈕的宏代碼，那麼該代碼應位於工作表的代碼表中（例如Book1 - Sheet1（Code））。如果您將工作表複製到新的工作簿中，則代碼表應該出現。剛剛測試過，它的工作原理。 – Jeeped

感謝您的參與> Jeeped是正確的，activeX控件工作並被導出到新保存的文件。

來源

2015-08-21 08:32:44 Vincent

VBA保存包括其宏的Excel表格

回答

相關問題