我不是Excel的专家用户。我想知道如何搜索特定关键字,复制并将所有行导出到新的Excel文件或表单中。我发现很多关于使用excel进行应对和导出的帖子,但最终都很累。我附上了一张照片。请让我知道最简单,最简单和成功的方法。我不知道如何以及在哪里添加代码在Excel中。我可以在Excel中做+, - 和x ..我会很感激你。如何搜索特定的关键字,复制并导出
在这里,您可以看到图像
我不是Excel的专家用户。我想知道如何搜索特定关键字,复制并将所有行导出到新的Excel文件或表单中。我发现很多关于使用excel进行应对和导出的帖子,但最终都很累。我附上了一张照片。请让我知道最简单,最简单和成功的方法。我不知道如何以及在哪里添加代码在Excel中。我可以在Excel中做+, - 和x ..我会很感激你。如何搜索特定的关键字,复制并导出
在这里,您可以看到图像
此链接将帮助您加入“开发者”选项,在Excel中的色带。这将允许您在Excel中添加代码。您可以右键单击电子表格底部的图纸选项卡(图片中显示“前100万...”的选项卡),然后选择“查看代码”以访问VBA编辑器。
http://www.excel-easy.com/vba/create-a-macro.html
要搜索一个特定的关键字,你可以通过在coloumn所有细胞循环使用此代码
' cell number and index are variables for row number
Dim cell_number As Integer
Dim index As Integer
For row_number = 1 To 20
For coloumn_number = 1 To 20
If Sheet1.Cells(cell_number, coloumn_number).Value = "enter keyword here" Then
'add code for whatever you want to do (like store data in an array for "export")
End If
Next
Next
而是采用宏观的,你可以简单地使用VLOOKUP使用for循环公式和Excel的过滤器功能。具体方法如下:它根据你的截图编号
=VLOOKUP("*forum*", $B1:$B$1000000,1, FALSE)
嗨凯文谢谢你帮助我。我跟着所有的步骤,但仍然有一个错误,代码无法进行。这里是我添加的代码请检查单元格号和索引是变量行号 Dim cell_number As Integer Dim index As Integer 对于ROW_NUMBER = 1〜1000 对于coloumn_number = 1〜3 如果Sheet1.Cells(cell_number,coloumn_number).value的= “论坛” 然后 “添加任何你想做的事情(比如数据存储在阵列码用于“输出”) End If Next – user3416720