Excel VBA关闭当前工作簿错误1004-Java 学习之路

我在Excel工作簿中有一些VBA代码 . 我有一个单元格，我想用它关闭工作簿而不保存（而不是使用excel右上角的常用（X）关闭按钮 .

如果我使用（X）按钮关闭工作簿，它可以很好地使用以下代码 . 但是，如果我按下工作表上的“关闭”按钮单元格，则会出现1004错误 .

有人可以帮忙吗？

在按钮上的工作单上

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Cells(ActiveCell.Row, ActiveCell.Column) = "CLOSE" Then

    CloseNoSave
End If

End Sub

在本书中

Private Sub Workbook_BeforeClose(Cancel As Boolean)

    CloseNoSave

End Sub

在模块中

Sub CloseNoSave()

    ThisWorkbook.Close savechanges:=False
End Sub

1 回答

你为什么不在 Selection 事件上使用一段代码？

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If ActiveCell.Value = "CLOSE" Then
        ThisWorkbook.Saved = True
        ThisWorkbook.Close
    End If
End Sub

回复于 2024-04-28T22:17:53+08:00

Excel VBA关闭当前工作簿错误1004

1 回答

相关问题