VBA 提取满足条件的值到另一个表

发布网友发布时间：2022-04-21 17:12

共1个回答

热心网友时间：2023-10-05 16:32

用excel的vlookup函数就可以提取你要的信息，参考一下vlookup函数。追问谢谢！！但我需要的是VBA函数来处理

追答Sub getContent(src As Worksheet, des As Worksheet)

i = 1
j = 1

While (src.Cells(i, 1) "")
If (Trim(src.Cells(i, 4)) = "理工") Then
For k = 1 To 7
des.Cells(j, k) = src.Cells(i, k)
Next k
j = j + 1
End If
i = i + 1
Wend
End Sub

调用这个函数，把src,des分别设置为你的sheet1与sheet2就行

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com