使用VBA,代码如下:
Sub test()
Dim i, j, m As Integer
j = 2
For i = 1 To Worksheets(1).UsedRange.Rows.Count
If Worksheets(1).Cells(i, 1) = "你" Then
For m = 1 To 4
Worksheets(2).Cells(j, m) = Worksheets(1).Cells(i, m)
Next
j = j + 1
End If
Next
End Sub
比较复杂,我可以发个表给你,你参考一下。(直接应用函数)
能插入截图