输入数据后会根据数据自动跳到像对应的的一行

征服宇宙

要求在D1输入编码并回车.可以自动跳转到对应的下面那行.

表.zip (8.83 KB, 下载次数: 171)

2021-11-4 09:22 上传

点击文件名下载附件
表.zip

戚志利

？？
在E1单元格输入公式：=HYPERLINK("#A"&MATCH(D1,A:A,),D1)

特污兔

如果是查找相关内容，可以使用VLOOKUP
如果是选中并高亮，需要VBA或条件格式

开哥哥

要求在D1输入编码并回车.可以自动跳转到对应的下面那行.
需要VBA工作表事件。

心灵理疗师

不会弄.请大哥帮忙啊.

粟樱

不用高亮.只需要跳转到指定那行就可以了.

一阵风一道景

Alt+F11打开VBA编辑器。
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Address = "$D$1" Then
Columns(1).Interior.ColorIndex = 0
i = Application.WorksheetFunction.Match([d1], Columns(1), 0)
Cells(i, 1).Select
Cells(i, 1).Interior.ColorIndex = 3
End If
End Sub

高亮（红色）并跳转。

保加利亚炮王

表.zip (25.29 KB, 下载次数: 12)

2021-11-4 09:22 上传

点击文件名下载附件
表.zip
输入数据 点击按钮，跳转并高亮显示，如果输入的没有 会报错（点击结束即可），代码是拼凑的水平有限

两分不够三分来凑

非常感谢....