將具有特定值的行復制到另一張工作表

Question

我有一個巨大的Excel工作表，其中包含200,000行。 數據約為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