Question

我在Stack和google上搜索了一个答案，但无法找到解决问题的方法。

我有一个包含500行数据的电子表格。根据键值（0,1,2,3 ......等），每一行都有一个唯一的列标识符。

我在.txt文件中有一个我想要在Excel数据中选择的唯一列标识符列表。

我想知道是否有一种快速的方法可以在Excel中选择这些行而无需使用选择过滤器复选框手动选择每一行？

Answer 1

你可以使用类似的东西来使用过滤功能：

提供.txt文件只包含一个值，要过滤的列是A列

Option Explicit

Private Sub filterBasedOnTxt()

  Dim curWS As Worksheet
  Dim buildArray As Variant
  Dim in_line, w_txtArray, mysep As String

  Set curWS = ActiveWorkbook.ActiveSheet

  Open "c:\temp\myKeys.txt" For Input As #1

  Do Until EOF(1)
     Input #1, in_line
     w_txtArray = w_txtArray & mysep & in_line
     mysep = ";"
  Loop

  Close #1

  buildArray = Split(w_txtArray, mysep, -1)

  With curWS
     .Rows("1:1").Select
     Selection.AutoFilter
     .Range("A:A").AutoFilter field:=1, Criteria1:=buildArray, _    
     Operator:=xlFilterValues
  End With
  set curws = nothing
End Sub

Excel - 从值列表

1 个答案: