这个需要VBA代码进行控制。
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer
If Target.Address = "$A$1" And Target <> "" Then
i = Sheets("Sheet1").Range("A65536").End(xlUp).Row
Range("A2:B" & i).Find(Range("A1")).EntireRow.Select
End If
End Sub
打开EXCEL，按ALT+F11,进行VBE环境，双击SHEET1工作表，粘贴以上代码。
注意：("Sheet1")中的sheet1是工作表的名称，可自己修改。
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024