EXCLE打印后自动保存数据？(excel 打印后怎样自动储存)

excel 打印后怎样自动储存

需在excel中添加一个键“打印并保存”，并编制宏代码。每次打印时按“打印并保存”键（不用菜单中的打印图标），会将指定的内容保存到另一个工作表中。不知你的格式如何，只有看到具体内容才知如何做，不是用简单文字能说明白的，china_msn@live

可以自己做个打印按钮来实现。

该按钮引用以下程序，它可以实现打印，并自动保存文件：

Sub Prt()

Set c= ActiveWorkbook '设定c为本文件

ActiveWindow.SelectedSheets.PrintOut Copies:=1 '打印本文件1份

c.Save '保存本文件

End Sub

利用宏编写一段代码，把打印和保存的操作一同完成。

甚至可以把数据保存在后台，即隐藏的表格当中。

如果会懂VBA，那么很简单。插入一个按钮，下面的代码写上即可。

Private Sub CommandButton1_Click()

Me.PrintOut

ActiveWorkbook.Save

End Sub

如果不会，那也没问题，点击左下角的录制宏

然后操作一次保存和打印，停止录制。

随便插入一个图形，右键点击图形，指定宏，选择对应的宏即可。

这样就可以在打印同时保存。

是全部的excel工作簿都是这样吗？如果不是，那么看看是不是你的那个工作簿中含有VBA代码，可以把：工具——宏——安全性——高，关闭excel应用程序后再打开那工作簿看看，弹出了一个如图：

表示有VBA代码。消除它如下：

第2步：

Alt+F11进入visual Basic编辑器中，双击左边的This Workbook 打开代码框可以看到有这个在

Private Sub Workbook_BeforePrint(Cancel As Boolean)

代码……（省略）

End Sub

如图：

把那代码删除掉就可以了。

当然你也可以直接按照第2步来看有没有VBA代码。