Excel单元格特定文本检测：基于BoardRole列生成independent列赋值函数求助

嗨，这个需求其实挺常见的，我给你两种实用的解决方案，看你习惯用哪种：

方法一：用Excel内置公式直接实现 #

如果你不想写代码，用现成的公式就能轻松搞定。这里推荐IF+ISNUMBER+SEARCH的组合，它能检测BoardRole列里是否包含"Independent"文本（默认不区分大小写），满足条件就返回1，否则返回0：

=IF(ISNUMBER(SEARCH("Independent", [@BoardRole])), 1, 0)

• 如果你用的是普通单元格（不是Excel表格格式），把[@BoardRole]换成对应的单元格引用就行，比如A2，然后下拉填充整个列。
• 要是需要严格区分大小写，把SEARCH换成FIND即可，公式调整为：

=IF(ISNUMBER(FIND("Independent", [@BoardRole])), 1, 0)

方法二：自定义VBA函数（适合批量或复杂场景） #

如果你经常需要这个功能，或者要和其他VBA逻辑结合，可以写个自定义函数：

1. 按下Alt+F11打开VBA编辑器
2. 插入一个新模块，把下面的代码粘贴进去：

Function CheckIndependent(role As String) As Integer
    ' 检测文本是否包含"Independent"，不区分大小写
    If InStr(1, role, "Independent", vbTextCompare) > 0 Then
        CheckIndependent = 1
    Else
        CheckIndependent = 0
    End If
End Function

3. 返回Excel，在需要生成值的单元格里输入=CheckIndependent(A2)（把A2替换成你的BoardRole列对应单元格），下拉填充即可。

• 要区分大小写的话，把代码里的vbTextCompare改成vbBinaryCompare就行。

备注：内容来源于stack exchange，提问作者Teun