Excel VBAでセルの太字設定を変更する方法

単一のセルの太字設定を変更する場合: 下記のコードを使用します。

Sub ChangeFontBold()
   ' セルの太字設定を変更する
   Range("A1").Font.Bold = True
End Sub

上記の例では、セルA1の太字設定をTrueに設定しています。必要に応じて、セルの範囲を変更してください。

複数のセルの太字設定を変更する場合: 下記のコードを使用します。

Sub ChangeRangeFontBold()
   ' セル範囲の太字設定を変更する
   Range("A1:B5").Font.Bold = True
End Sub

上記の例では、セル範囲A1からB5までの太字設定をTrueに設定しています。必要に応じて、セル範囲を変更してください。

条件に基づいてセルの太字設定を変更する場合: 下記のコードを使用します。

Sub ChangeFontBoldBasedOnCondition()
   ' 条件に基づいてセルの太字設定を変更する
   Dim cell As Range
   For Each cell In Range("A1:A10")
       If cell.Value > 5 Then
           cell.Font.Bold = True
       Else
           cell.Font.Bold = False
       End If
   Next cell
End Sub

上記の例では、セル範囲A1からA10までの値が5より大きい場合には太字に設定し、それ以外の場合は太字を解除します。必要に応じて、条件やセル範囲を変更してください。