モジュール内に次の機能があります。
Function Colorize(myValue)
ActiveCell.Select
Selection.Font.Bold = True
Colorize = myValue
End Function
この関数を使用するセルは太字になっているはずです-ただし、エラーメッセージは表示されず、悲しくも本当ですが、太字になりません。私は何が欠けていますか?
ありがとう
UDFは、セル/シート/ワークブックのプロパティを変更できない値のみを返します。プロパティを変更するには、コードをWorksheet_Changeイベントなどに移動します。
例えば
Private Sub worksheet_change(ByVal target As Range)
target.Font.Bold = True
End Sub
私が使う
chartRange = xlWorkSheet.Rows[1];
chartRange.Font.Bold = true;
first-row-cells-fontを太字に変更します。そして、それは機能し、Excel 2007も使用しています。
VBAで直接呼び出すことができます
ActiveCell.Font.Bold = True
このコードを使用して、アクティブなセルに太字フォントと黄色の背景を持つタイムスタンプを作成します
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveCell.Value = Now()
ActiveCell.Font.Bold = True
ActiveCell.Interior.ColorIndex = 6
End Sub