现有表格里面插入一个保存按钮,点这个按钮实现以下内容,需要实现以下内容的代码
用现有表格的a1的内容+当前日期做为新建excel的名字
然后把现有表格里的a2:d4里的内容(不带公式)保存到刚才新建的excel里面
弹窗提醒保存成功(并提示路径和文件名)
*最好在新建的时候能弹个窗选择一下路径
宏录制好像录不进去右键新建excel的过程,所以主要是需要新建并打开新建的excel
这部分代码
感谢您的代码,功能已实现,可以补充一些代码,让新工作簿保存到同路径下吗?发现都保存到桌面会比较乱
本回答被提问者采纳您可以使用VBA宏来新建并打开一个Excel文件。具体步骤如下:
打开Excel,按“Alt + F11”打开VBA编辑器。
在VBA编辑器中,选择插入模块(Insert Module)。
输入以下代码:
Sub CreateNewWorkbook()
Dim newWorkbook As Workbook
Set newWorkbook = Workbooks.Add
newWorkbook.SaveAs "C:\example.xlsx"
newWorkbook.Activate
End Sub
按“F5”运行代码,它会创建一个新的Excel文件并打开它。
注意:请确保“C:\example.xlsx”路径可用,并替换为您希望存储新工作簿的位置。
可以使用VBA代码在Excel中新建并打开一个新的Excel工作簿,以下是一种实现方法:
打开一个Excel工作簿,按Alt + F11键打开VBA编辑器。
在模块中插入以下代码:
Sub OpenNewExcel()
Dim xlApp As Excel.Application
Set xlApp = New Excel.Application
xlApp.Visible = True
End Sub
按Alt + Q键退出VBA编辑器,然后在Excel的宏视图中运行该宏。
您可以在代码中修改xlApp.Visible = True的值,以控制新创建的Excel工作簿是否可见。