vba - Excel VBA : function to turn activecell to bold

Question

我的模块中有以下函数。

Function Colorize(myValue)
    ActiveCell.Select
    Selection.Font.Bold = True
    Colorize = myValue
End Function

将使用此功能的单元格应该变成粗体 - 但是，我没有收到任何错误消息，令人悲伤的是，它没有变成粗体。我错过了什么？

谢谢

Answer 1

UDF 只会返回一个值，它不允许您更改单元格/工作表/工作簿的属性。将代码移至 Worksheet_Change 事件或类似的更改属性。

例如

Private Sub worksheet_change(ByVal target As Range)
  target.Font.Bold = True
End Sub