If Selection.Font.Bold = False Then
Selection.Font.Bold = True
Else
Selection.Font.Bold = False
End If
これは、範囲が選択されている場合に機能します。
セルが編集モードで、そのコンテンツの一部のみが選択されている場合に同じものを作成する方法は?
これは、セルの一部をフォーマットするために使用するものですが、編集が完了した後にのみこれを行うことができます - ティム・ウィリアムズが言ったように.
With ActiveCell.Characters(Start:=3, Length:=2).Font
.Name = "Calibri"
.Size = 11
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ThemeColor = xlThemeColorLight1
.TintAndShade = 0
.ThemeFont = xlThemeFontMinor
End With