如果运行Private Sub ComboBox1_Click()前按过“CommandButton”按钮,
那么不弹出消息框,否则弹出消息框,不知这样写,请帮忙
Private Sub ComboBox1_Click()
如果点按“CommandButton”按钮,不弹出消息框,否则弹出消息框
i = MsgBox("是否修改", 3 + 64, "温馨提示")
If i = 6 Then '是
ActiveWorkbook.Save '保存
[H5] = "试验"
ElseIf i = 7 Then '否
[I6] = "试验试验"
ElseIf i = 2 Then '取消
Exit Sub
End If
ComboBox1.ListIndex = -1 '不选择项
End Sub