Excel VBA 文字列の一部の取り消し線の判別
ExcelのVBAでセルの中の文字列の一部に
取り消し線があるかどうかを知るにはどのように記述すればよいでしょうか。
例えば、A1セルの中にAAA,BBB,CCCと入力されていて
BBBにだけ文字飾りの取り消し線が設定されているような場合、
以下のコードではELSEになってしまいます。
If ThisWorkbook.Sheets("Sheet1").Range("A1").Font.Strikethrough = True Then
MsgBox ("このセルには取り消し線があります")
Else
MsgBox ("このセルには取り消し線はありません")
End If
お礼
ありがとうございます。とても参考になりました