Home » エクセルマクロ・Excel VBAの使い方 » 図形内文字列 » Excel VBAで図形内文字列に蛍光ペンを設定する

Excel VBAで図形内文字列に蛍光ペンを設定する

動作検証バージョン:Windows 11 Home + 64bit Excel バージョン 2412(ビルド18324.20012クイック実行)ベータチャネル

PowerPoint VBAで蛍光ペンを設定するコードをご紹介しました。

ほとんど同じコードでExcelでも図形内の文字列に蛍光ペンを設定できます。

[スポンサードリンク]

図形内文字列に蛍光ペンを設定するサンプルマクロ

1枚目のシートの1つ目の図形に文字列が入力されているときに、以下のExcelマクロを実行すると、図形の1文字目に緑色の蛍光ペンが設定されます。

Sub 図形内の文字列に蛍光ペンを設定する()
 Sheets(1).Shapes(1) _
  .TextFrame2.TextRange.Characters(1, 1) _
   .Font.Highlight.RGB = RGB(0, 255, 0)
End Sub

サンプルマクロで行っている処理について

PowerPoint VBAで

 ActivePresentation.Slides(1).Shapes(1) _
_
となっていたコードが、
 Sheets(1).Shapes(1) _

になっていることだけが違い、このコードにつづく

  .TextFrame2.TextRange.Characters(1, 1) _
    .Font.Highlight.RGB = RGB(0, 255, 0)

は同じです。
ShapeオブジェクトのTextFrame2プロパティでTextFrame2オブジェクトを取得した以降は、Officeで共通だからです。

[スポンサードリンク]

Home » エクセルマクロ・Excel VBAの使い方 » 図形内文字列 » Excel VBAで図形内文字列に蛍光ペンを設定する

「図形内文字列」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.