如何取消excel文件未作任何修改退出前总是出现是否要保存这个提示啊？

引用你所说的“即使新建一个表格什么也不做”，在你选择新建时已经对原有的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，在打开窗口中选择你说的文件，完成后，该文件的宏就没密码了。接着我上面的步骤，可以解决了。

试试打开EXCEL，然后点“工具→宏→Visual Basic编辑器”将会出现如下窗口

双击Start Up，会出现一个有代码的窗口，把里面的代码删了，保存，退出。

excel表格打开后，如果你在里面的任意位置点击了一下，即使没有任何更改。那么它也会认为你对此表格进行了改动，关闭时当然会提示是否保存。点击否就是了，只能如此。如果打开后，注意不点击任何位置，立即关闭，仍然提示保存，那就杀毒。下载宏病毒专杀工具