我有一列82,550项，我想知道它们是否存在于200 x 19,000 excel表中

Question

我有一个项目列表（82,000），我想知道它们是否存在，如果是，那么（行和列）在200 x 19,000的数组中。他们目前都坐在excel文件中。

这些项目都是字符串，范围从-5,250.0002到Vol Price Index

我已经尝试将excel文件输出到mySQL数据库，但是我已经做了10年，我不知道如何查询它，或者即使我已正确创建表或使用正确的模式。

Answer 1

这是一些演示代码：

Sub WhereIsIt()
    Dim s1 As Worksheet, s2 As Worksheet
    Dim BottomRow As Long, i As Long, v As Variant
    Dim Tabl As Range, r As Range

    Set s1 = Sheets("Sheet1")
    Set s2 = Sheets("Sheet2")
    Set Tabl = s2.Range("A1:GR19000")
    BottomRow = s1.Cells(Rows.Count, "A").End(xlUp).Row

    For i = 1 To BottomRow
        v = s1.Cells(i, 1).Value
        Set r = Tabl.Find(What:=v, After:=Tabl(1, 1))
        If r Is Nothing Then
            s1.Cells(i, 2).Value = "Not Found"
        Else
            s1.Cells(i, 2).Value = r.Address(0, 0)
        End If
    Next i
End Sub

Sheet1有列表，Sheet2有表。

编辑＃1：

宏很容易安装和使用：

1. ALT-F11调出VBE窗口
2. ALT-I ALT-M打开一个新模块
3. 粘贴内容并关闭VBE窗口

如果保存工作簿，宏将与其一起保存。如果您在2003年之后使用的是Excel版本，则必须将文件另存为.xlsm而不是.xlsx

要删除宏：

1. 如上所述调出VBE窗口
2. 清除代码
3. 关闭VBE窗口

要使用Excel窗口中的宏：

1. ALT-F8
2. 选择宏
3. 触摸RUN

要了解有关宏的更多信息，请参阅：

http://www.mvps.org/dmcritchie/excel/getstarted.htm

和

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

必须启用宏才能使其正常工作！