1.office 2010,文档未保存,office进程停止,在打开office文档,会显示下图中的现象,怎么操作才能保存
上次的?
那不是有一个另存为吗?点击它重新保存。
2.office恢复未保存文件
word恢复未保存文档
3.为什么EXCEL保存时出现文档未保存的提示??
朋友发了个EXCEL文件给我~我打开文件在里面修改后,就保存不了~~请高手指教一下~~~
1、先来打开Excel ,接着点击固定栏的【文件】选项,等我们进入后点击【选项】按钮。
2、在新弹出的窗口找到并点击【保存】选项。
3、这个时候会弹出一个新的对话框,在弹出的新的对话框就可以看到【自动恢复文件的位置】的选项了,这个就是文件自动保存在的目录了。
4、就要把里面的路径全部选中,就可以来点击一下右键了,接着就可以复制这个路径了,复制这个。
5、在打开一个文件夹,可以在路径输入栏中把刚才复制的粘贴过来,打开之后就可以看到文件了。
EXCEL保存时出现“文档未保存”提示的可能原因:
1.宏出问题。
2.部分模块丢失。
3.病毒破坏。
4.采用了“自动筛选”和“冻结窗口”两个功能。
5.临时文件没有被删除。
6.软件未正确安装或使用过程中被损坏。
解决办法:
1.先打开需要处理的excel,然后打开工具栏--宏--录制新宏--确定--停止录制宏--宏-宏--编辑--复制以下程序
Sub 恢复保存()
name0 = ActiveWorkbook.Name
j = Sheets.Count
For i = 1 To j
Sheets(1).Visible = -1
Sheets(1).Move
Sheets(1).Move after:=Workbooks(name0).Sheets(j - 1)
Next
End Sub
然后接着运行宏,后停止。最后关闭即可。
2.重装软件。
3.用杀毒软件对电脑全盘杀毒。
同时按Alt和F11,如果你朋友未给宏设密码,可以在左上窗口找到Thisworkbook,双击它,应该会有以下类似代码:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ThisWorkbook.Saved = True
ThisWorkbook.Close 0
End Sub
把这些玩意删除就可以了。
如果文件的宏已设密码,请做如下操作:
关闭你的文件,新开一Excel,同时按Alt和F11,进入VBA界面,右键点左上窗口的Thisworkbook,插入,模块,在右边出来的窗口中粘贴如下代码:
Sub MoveProtect()
Dim FileName As String
FileName = Application.GetOpenFilename("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 = Application.GetOpenFilename("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,在打开窗口中选择你说的文件,完成后,该文件的宏就没密码了。接着按我上面的步骤,可以解决了。
EXCEL保存时出现“文档未保存”提示的可能原因:
1.宏出问题。
2.部分模块丢失。
3.病毒破坏。
4.采用了“自动筛选”和“冻结窗口”两个功能。
5.临时文件没有被删除。
6.软件未正确安装或使用过程中被损坏。
解决办法:
1.先打开需要处理的excel,然后打开工具栏--宏--录制新宏--确定--停止录制宏--宏-宏--编辑--复制以下程序
Sub 恢复保存()
name0 = ActiveWorkbook.Name
j = Sheets.Count
For i = 1 To j
Sheets(1).Visible = -1
Sheets(1).Move
Sheets(1).Move after:=Workbooks(name0).Sheets(j - 1)
Next
End Sub
然后接着运行宏,后停止。最后关闭即可。
2.重装软件。
3.用杀毒软件对电脑全盘杀毒。
可能是在服务器上打开的,建议另存到本地后编辑应该就可以了。
4.Microsoft office Word老是自动关闭,以致未保存的文档丢失是怎么回事儿,该如何解决
注:没有停电或计算机死机的情况,也没有误操作
重装软件。
不过,你有时间和精力去研究为什么会出故障的话,可以去研究下。
可以有病毒,用最新的杀软件清扫下
像这样的故障的确不太好解决。
1、查毒。确认是否受病毒干扰所致。
2、把Word卸载重新安装试试。看是否Word本身故障。
3、少数情况下,也可能和输入法有关系。
4、实在不行只有重装系统了。
5.office2013,对内容进行修改未保存时,标题栏的文件名后面会显示*(星号),怎么调出来
我记得不论是word还是ppt,excel,在对其内容作出修改并且没有保存时应该会有星号提示,重装一次后没了,请问如何调出来?如图1是刚打开,那么图二应该是做出修改但未保存时的样子(图中*星号是凭记忆画上的...)
是OneDrive没有登录
窗口下方的状态栏上,有个小磁盘的标志,“已保存”和“未保存”它的显示是不一样的。