Question

VBA编译错误：发现二义性的名称：Worksheet_SelectionChange

有两组代码，一组是模糊输入的代码，一组是记录修改的代码，可是这两组代码放在一起就出现发现二义的名称，如果我想同时完成这两项我该怎么改呢？哪位高手帮忙看一下！

以下这几张图片是模糊输入的代码

以下这组图片是记录修改的代码





Answer 1

你截图的这些代码都在一个sheet下面吗？那肯定要报错啊，你有2个Private Sub Worksheet_SelectionChange(ByVal Target As Range)，名字一样，参数一样，发生事件的时候到底调用哪一个呢？要么合并功能，要么把其中一个改成其他事件驱动

追问

谢谢！我把相关代码合并了！

追答

合并很简答啊，就是把2个Private Sub Worksheet_SelectionChange(ByVal Target As Range)中间的东西放到1个里面，剪切粘帖，空的那个就不要了，
你最后一张图是怎么回事？其他人后来加上去这块新的才报错的吗？我不知道这段加上去是干嘛的，如果这一块是独立的功能，可以把front和after统一替换成其他变量名，甚至这句话可以删掉，不要用公共变量，如果是因为已经申明过了就不能再声明了。