Home » Excel VBA Rangeオブジェクト » 罫線・Borders » Excel VBAでアクティブでないシートに罫線を引く

Excel VBAでアクティブでないシートに罫線を引く

動作検証バージョン：Windows 11 Home + 64bit Excel（バージョン2309 ビルド16811.20004 クイック実行）

「vba アクティブでないシートに罫線を引く」
といった検索でアクセスがありました。

［スポンサードリンク］

アクティブなシートに罫線を引くサンプルマクロ

まず、アクティブなワークシートに罫線を引くコードを確認しましょう。

Sub 罫線を引く()
　Range("C3:E5").BorderAround _
　　　LineStyle:=xlContinuous, _
　　　Weight:=xlThick, _
　　　Color:=RGB(255, 0, 0)
End Sub

上記のExcelマクロを実行すると、アクティブシートのC3:E5セルに、赤色の太い外枠罫線が引かれます。

本題のアクティブではないシートに罫線を引く基本は以下のとおりです。

Sub 罫線を引く()
　Worksheets("Sheet2").Range("C3:E5").BorderAround _
　　　LineStyle:=xlContinuous, _
　　　Weight:=xlThick, _
　　　Color:=RGB(255, 0, 0)
End Sub

「Sheet2」というシート名のワークシートが存在するブックがアクティブな状態で上記のマクロを実行すると、「Sheet2」シートがアクティブでもアクティブでなくても、C3:E5セルに、先ほどと同様の罫線が引かれます。

先ほどは、

Range("C3:E5").BorderAround _

とRangeプロパティの前に何も指定していなかったため、アクティブシートのC3:E5セルが処理対象になっており、

Worksheets("Sheet2").Range("C3:E5").BorderAround _

とWorksheetから辿ってRangeを取得するコードを書くことで、「Sheet2」シートのC3:E5セルが処理対象になります。
「Sheet2」シートが、アクティブでもアクティブでなくても。

「vba アクティブでないシートに罫線を引く」
と検索なさった方が、どこで躓いたのかわかりませんが、オブジェクトの階層を辿って取得するのが基本です。

最終更新日時：2023-08-20 20:12

［スポンサードリンク］

Home » Excel VBA Rangeオブジェクト » 罫線・Borders » Excel VBAでアクティブでないシートに罫線を引く

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の元になったキンドル本です↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

Excel VBAユーザーを対象とした、Word VBAの入門書をキンドル本として出しました↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

3年前(2021年4月)の
人気記事

「罫線・Borders」の記事一覧