自定义功能不会自动更新（设置被设置为自动计算！）

Question

我有一个自定义函数，用于检测单元格是否为粗体

Function isBold(cellBold)
If cellBold.Font.Bold = True Then
    isBold = 1
ElseIf cellBold.Font.Bold = False Then
    isBold = 0
Else
    isBold = 0
End If

End Function

如果参考单元格为粗体，则将1放入单元格；如果非粗体则将0置于单元格中效果很好，并且所有时间都是第一次，但是如果我将参考单元格设置为粗体，则数字保持为0。自动计算处于启用状态，该函数再次进行计算的唯一方法是重新键入该函数

Answer 1

将Application.Volatile添加到函数的顶部将在触发工作簿更改事件时使其自动更新。

Answer 2

[好，所以我将是第一个承认这不是理想的解决方案，并且非常hacky。但我认为它将解决您的问题。