帮我写一个Excel出现关键词单元格个数的函数。

在Excel中，你可以使用VBA（Visual Basic for Applications）编写一个函数来计算包含特定关键词的单元格数量。这是一个简单的例子，假设我们有一个范围A1:E10，你想查找关键词"目标"：

Function CountKeyword(rng As Range, keyword As String) As Long
    Dim count As Long
    For Each cell In rng
        If cell.Value Like "*" & keyword & "*" Then ' 使用通配符*匹配关键词
            count = count + 1
        End If
    Next cell
    CountKeyword = count
End Function

在这个函数中：
- `rng` 参数是你想要搜索的范围，比如 A1:E10。
- `keyword` 参数是要查找的关键字。

你可以在一个新的Excel模块中复制粘贴这个函数，然后在任何地方通过公式 `=CountKeyword(A1:E10, "目标")` 来调用它并获取结果。