如何检查单元格的值是否是另一个单元格的子值

时间:2012-03-15 20:27:00

标签: excel vba

我有两个列和ID,例如“TCG45436”。第一列包括括号中的数字,如“TCG45436(5)”。我需要检查两列以查看ID是否匹配,如果不匹配则清除第二列的单元格内容。如果第一列包含(5),则问题是两者不匹配,但我只需要ID本身在两列中匹配。我过去做过类似的事情,使用子字符串来查找第2列是否是第1列的子字符串,但我无法弄清楚如何在此处应用它。

基本上,我想在这个片段中清除B30和B32-B37。

Excel ScreenShot http://img526.imageshack.us/img526/7646/24288154.png

Sub TwoColumns()
Do Until ActiveCell.Value = ""
Column1 = ActiveCell.Value
Column2 = ActiveCell.Offset(0, 1).Value

If Column1 = Column2 Then 'needs to be If Column2 is equal to or a subvalue of Column1
Else
    ActiveCell.Offset(0, 1).ClearContents
End If
    ActiveCell.Offset(1, 0).Select
Loop
End Sub

由于

1 个答案:

答案 0 :(得分:3)

您可能想要使用InStr功能:

If InStr(0, Column1.Value, Column2.Value) <> 0 Then 'it's a substring.