EXCEL显示 文件未保存 解决方

EXCEL显示 文件未保存 解决方,第1张

方法一、

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就开始成为所适用 *** 作平台上的电子制表软件的霸主。

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/bake/13493185.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2025-09-01
下一篇2025-09-01

发表评论

登录后才能评论

评论列表(0条)

    保存