Question

我有一个包含200,000行的巨大Excel工作表。数据大约是列在B列中的120个主题，如sinani-01到sinani-120。我需要复制列B包含sinani-01的所有行，并将它们粘贴到新工作表中。或者至少只选择它们？能告诉我如何在VBA中做到这一点吗？

Answer 1

Excel具有AutoFilter函数，您可以使用该函数仅选择包含特定值的行。你这样使用它：

' Filter column B by a specific value...
Range("B:B").AutoFilter 1, "sinani-01"

' Copy all visible rows to a new sheet...
Range("B:B").SpecialCells(xlCellTypeVisible).EntireRow.Copy Sheets("sinani-01").Range("A1")

' Turn the AutoFilter back off...
Range("B1").AutoFilter

将具有特定值的行复制到另一个工作表

1 个答案: