
方法一、
1、编辑完成后,右键点左下角的任一标签名,点选定“全部工作表;
2、再在标签名上点右键,这次选“移动或复制工作表,但d出的小窗口
选上面选“新工作簿,下面勾选“建立副本
3、然后点“确定,这时会新打一个新的EXCEL文件,文件名是BOOK1,这个BOOK1就是我们可以进行任何 *** 作的复制文件了;
4、把BOOK1换名另存到需要的位置,以前 *** 作的那个原文件就不管它了。;
5、大功告成!
方法二、用WPS表格2012打开、编辑和保存,但以后也只能这样用WPS表格 *** 作,到了excel上还是不能正常保存;
工具:(1)excel软件;
(2)要 *** 作的表;
excel被修改后保存,恢复未保存前的步骤是:
1、准备模拟数据。例如:依次在A到D列填充上姓名、水果、数量和单价,这些都是测试内容,可以随意输入。
2、然后在菜单栏找到“文件/左上角圆形按钮”,点击后选择“选项”。
3、在d出的“Excel选项”窗口中,点击“保存”按钮,将“保存自动恢复信息时间间隔10分钟”,设置为1分钟。
4、设置好之后,修改表格中的内容。例如:将字体颜色修改为“橙色”,“数量”和“单价”均修改为0,保存并等待2分钟,然后开始找回我们的原始版本。
5、回到设置自动保存时间间隔的地方,找到保存路径,一般地址为“C:\Users\[本机账户名]\AppData\Roaming\Microsoft\Excel\”下边。
6、进入文件夹,里面可能有一个或者多个保存文档,点击任意文档,即可查看以前的存档文件。
7、双击任意文件打开后,可以看到工具栏下方,有条横条显示是否“还原”。
8、在菜单栏中点击“开始”,在左侧的“信息”也就是默认的界面上找到“版本/管理版本”,点击即可对需要的时间段进行还原恢复。
这样就解决了excel被修改后保存,恢复未保存前的问题。
同时按Alt和F11,如果未给宏设密码,可以在左上窗口找到Thisworkbook,双击它,应该会有以下类似代码:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ThisWorkbookSaved = True
ThisWorkbookClose 0
End Sub
把这些玩意删除就可以了。如果文件的宏已设密码,请做如下 *** 作:
关闭文件,新开一Excel,同时按Alt和F11,进入VBA界面,右键点左上窗口的Thisworkbook,插入,模块,在右边出来的窗口中粘贴如下代码:
Sub MoveProtect()
Dim FileName As String
FileName = ApplicationGetOpenFilename("Excel文件(xls & xla),xls;xla", , "VBA破解")
If FileName = CStr(False) Then
Exit Sub
Else
VBAPassword FileName, False
End If
End Sub'设置VBA编码保护
Sub SetProtect()
Dim FileName As String
FileName = ApplicationGetOpenFilename("Excel文件(xls & xla),xls;xla", , "VBA破解")
If FileName = CStr(False) Then
Exit Sub
Else
VBAPassword FileName, True
End If
End SubPrivate Function VBAPassword(FileName As String, Optional Protect As Boolean = False)
If Dir(FileName) = "" Then
Exit Function
Else
FileCopy FileName, FileName & "bak"
End If Dim GetData As String 5
Open FileName For Binary As #1
Dim CMGs As Long
Dim DPBo As Long
For i = 1 To LOF(1)
Get #1, i, GetData
If GetData = "CMG=""" Then CMGs = i
If GetData = "[Host" Then DPBo = i - 2: Exit For
Next
If CMGs = 0 Then
MsgBox "请先对VBA编码设置一个保护密码", 32, "提示"
Exit Function
End If
If Protect = False Then
Dim St As String 2
Dim s20 As String 1
'取得一个0D0A十六进制字串
Get #1, CMGs - 2, St
'取得一个20十六制字串
Get #1, DPBo + 16, s20
'替换加密部份机码
For i = CMGs To DPBo Step 2
Put #1, i, St
Next
'加入不配对符号
If (DPBo - CMGs) Mod 2 <> 0 Then
Put #1, DPBo + 1, s20
End If
MsgBox "文件解密成功", 32, "提示"
Else
Dim MMs As String 5
MMs = "DPB="""
Put #1, CMGs, MMs
MsgBox "对文件特殊加密成功", 32, "提示"
End If
Close #1
End Function
然后按F5,运行MoveProtect,在打开窗口中选择你说的文件,完成后,该文件的宏就没密码了。接着我上面的步骤,可以解决了。
1、excel没保存可以这样拯救:打开excel软件,点开右上角的文件。再点左下角的选项。找到保存按钮。复制自动保存的位置。把刚刚复制的位置,在粘贴到我的电脑浏览框里回车。这样就可以看见我们没有保存的文件了。
2、MicrosoftExcel是Microsoft为使用Windows和AppleMacintosh *** 作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具,再加上成功的市场营销,使Excel成为最流行的个人计算机数据处理软件。在1993年,作为MicrosoftOffice的组件发布了50版之后,Excel就开始成为所适用 *** 作平台上的电子制表软件的霸主。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)