发布网友
共2个回答
热心网友
请在宏清除数据之前,添加以下代码:
If MsgBox("请确认是否清除指定单元内容?按“否”取消。", vbYesNo, "提示:") = vbNo Then
热心网友
在你录制的宏的最开始添加3行代码
Sub TEXT()
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim i As Integer
i = MsgBox("是否要清除数据", 1, "数据清除")
If i = 2 Then Exit Sub
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
''''''''''''''''''''''''''''''''''''''''''''
''''下面是你录制的东西
End Sub