タイトルの取得と変更

ウィンドウのタイトルにはデフォルトではウィンドウに含まれているワークブックのブック名が表示されています。このタイトルを任意の文字列に変更することができます。ここでは Excel VBA を使ってウィンドウのタイトルの取得と変更方法について解説します。

(2022 年 06 月 15 日公開 / 2022 年 06 月 15 日更新)

タイトルの取得と変更

タイトルを変更するには、変更したいWindowオブジェクトの「Caption」プロパティを使います。

ActiveWindow.Caption = "タイトル"

タイトルを変更してもブック名には変更はありません。またブックを保存してもタイトルの変更は保存されません。あくまで一時的にタイトルを変更するためだけのものです。

サンプルプログラム

では簡単なサンプルで試してみましょう。

Sub テスト()
    
    Dim window1 As Window
    
    Windows("VBAsample.xls").Activate
    Set window1 = ActiveWindow
    
    window1.ActiveSheet.Range("A1").Value = window1.Caption
    
    window1.Caption = "タイトル"
    window1.ActiveSheet.Range("A2").Value = window1.Caption
     
End Sub

上記マクロを実行すると次のよう表示されます。

ウィンドウタイトルの設定

-- --

Excel VBA を使ってウィンドウのタイトルの取得と変更方法について解説しました。

( Written by Tatsuo Ikura )

広告
Profile
profile_img

著者 / TATSUO IKURA

初心者~中級者の方を対象としたプログラミング方法や開発環境の構築の解説を行うサイトの運営を行っています。