[已解决]怎么让这个消息框只出现一次呢？看看附件吧

liwenhong

附件： 怎么让消息框只出现一次呢？.zip (5.75 KB, 下载次数: 6)

2014-4-21 22:19 上传

点击文件名下载附件

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2014-4-21 22:26

1. Dim bl As Boolean
   
2. 
   
3. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   
4.     If Not bl Then MsgBox "重要提示！......"
   
5.     bl = True
   
6. End Sub
   

复制代码

跳转到最佳答案楼层

hwc2ycy

因为是用的selectionchange事件，所以，当你在工作表1中改变选择的单元格区域时就会触发。

hwc2ycy

1. Dim bl As Boolean
   
2. 
   
3. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   
4.     If Not bl Then MsgBox "重要提示！......"
   
5.     bl = True
   
6. End Sub
   

复制代码

liwenhong

hwc2ycy 发表于 2014-4-21 22:26

您的办法使我完全解决了问题，这也说明：办法总比困难多！非常谢谢您！

hwc2ycy

liwenhong 发表于 2014-4-22 10:49
您的办法使我完全解决了问题，这也说明：办法总比困难多！非常谢谢您！

我每帮别人解决一个问题，我就学到一个知识点，{:1112:}