选中D2:G8区域,执行条件格式——采用公式设置——公式为:
=$e2=$B$3
然后设置单元格格式,如填充色为浅红
这样,只要你输入的编号在表格中,这行就会突出显示出来,如果没有,就不会有突出显示
ALT F11
将下面代码 复制进去
Private Sub Worksheet_Change(ByVal Target As Range)
If Cells(5, 2) <= 0 Then
Range("A1").Select
Else
Range("h" & Cells(5, 2) + 1)="存在"
End If
End Sub
有问题再联系