在Excel列中搜索字符串

Question

我有一个如下所示的Excel文件：

Col A   Col B   Col C
------  -----   -------
ABC     3600    Title 1
DEF     3601    Title 2
ABC     3603    Title 3
GHI     3603    Title 4
ABC     3602    Title 5
JKL     3604    Title 6

等

我需要说的是：IF列A是'ABC'而B列是NOT（3601,3602,3603,3700）然后在D列（空列）中放置一个'1'。

我究竟如何将其放入VBA？

Answer 1

你需要VBA吗？

公式为：

=IF(A1="ABC";IF(OR(B1=3601;B1=3602;B1=3603;B1=3700);"";1);"")

下图中有错误（细胞移位），上面的公式是正确的。

VBA：

Function CellCombination(Cell1 As Range, Cell2 As Range) As String
  CellCombination = ""
    If Cell1.Value = "ABC" Then
      Select Case Cell2.Value
        Case 3601 To 3603, 3700
        Case Else
          CellCombination = "1"
      End Select
   End If
End Function

带有示例的电子表格：http://www.bumpclub.ee/~jyri_r/Excel/CellCombinations.xls