在另一个列表中以不同形式出现的一个列表中的条目



我有两个名称列表,并想突出列表1中姓氏1中带有姓氏的单元格。问题是我可能需要此重复列表以包含通配符。

列表1包含格式的名称:

W. Viitala
T. Saarinen
I. Äijälä

列表2仅包含:

Viitala
Saarinen
Äijälä

另外,这可能需要包括某种删除外国字符的功能,例如:äijälä到aijala,因为它们有时可能包括在列表2?

中?

这是可能的吗?

另外,是否有可能自动化删除逗号并用新线代替它们的过程?因此,以下名称可以粘贴到新行中?

Viitala,Saarinen,äijälä

不是从OP中进行编辑,而是从OP的注释之一链接到示例:

http://gyazo.com/9bec82c67b76f6073491f53580945de4

这不是一个完整的证明解决方案,但可能会有所帮助:假设B1中的A1:A10和List2中的List1:B10

在B1:B10中应用条件格式 - 新规则 - 使用公式确定要格式化的单元格

写这个公式:

=COUNTIF($A1:$A10;"*" & B1 & "*")>0

有条件格式,例如:

=ISNUMBER(MATCH(MID(A1,FIND(" ",A1)+1,LEN(A1)),G:G,0))  

应用于A:A似乎适合OP

我使用vba做到了这一点。我没有找到将1个单元与列进行比较的方法。

您知道如何使用VBA吗?有此功能:instr(start Position,string1,string2)

sub findDuplicated()

For i = 2 To Range("A1").End(xlDown).Row      'values to be highlighted
    For j = 2 To Range("B1").End(xlDown).Row  'strings to be searched
       If InStr(1, Cells(i, 1).Value, Cells(j, 7).Value) <> 0 Then      ' if it is found
            Cells(i, 1).Interior.Color = RGB(255, 255, 0)             ' highlight list1
            Cells(j, 7).Interior.Color = RGB(255, 255, 0)             ' highlight list2
       End If
    Next j
Next i
End Sub

它将在A列搜索如果B列值中存在。它们匹配了,它将突出显示在A列的发现比赛。是你想要的吗?

此外,您还可以使用字符。您需要为要替换的每个字符调用此功能:

Sub commaToDot(char1,char2)
    Range("B1:B50").Select           ' here you select your range
    For Each Cell In Selection
        Cell.Value = Replace(Cell.Value, char1, char2)       ' it replaces char1 for char2
    Next
End sub

相关内容

  • 没有找到相关文章

最新更新