Worksheet_Change 有两段代码,合并成一个就好把最后图片的private sub worksheet_change(byval target as range)这一句改为end select,结束上一个select,如果有if,同样此处结束,或者下面的K3的if改为else if
用if或者select case之类的进行分段处理。