Home » Excel VBA Rangeオブジェクト » 罫線・Borders » 斜め線をVBAでクリアする－Borders(xlDiagonalDown)・Borders(xlDiagonalUp)

斜め線をVBAでクリアする－Borders(xlDiagonalDown)・Borders(xlDiagonalUp)

対象：Excel2010, Excel2013, Windows版Excel2016

斜め線をVBAでクリアする

「vba 斜め線 消す excel」
「excel vba 斜め罫線の削除」
といった検索でアクセスがありました。

セル罫線の斜め線を消す、Excel VBAのコードを探していらした方による検索です。

どのアプリケーションでの話かはわかりませんけれど、
「vba 罫線 斜め クリア」
「vba 斜め線のみ消す」
「マクロ 斜め罫線を消す」
といった検索キーワードでのアクセスもあります。

［スポンサードリンク］

選択セルの斜め線を消すサンプルマクロ

いつものように簡単なマクロを作ってみました。

以下のSubプロシージャを実行すると、選択していたセル範囲の、斜め線だけを削除できます。
Sub 斜め罫線を消す()
　With Selection
　　.Borders(xlDiagonalDown).LineStyle = xlNone
　　.Borders(xlDiagonalUp).LineStyle = xlNone
　End With
End Sub

サンプルマクロで利用しているオブジェクト式について

Bordersプロパティの引数（実際は、Bordersコレクションオブジェクトのデフォルトプロパティ・_Default）に、

斜め線をVBAでクリアする

定数・xlDiagonalDownを指定すると右下がりの斜め線を表すBorderオブジェクトを、定数・xlDiagonalUpを指定すると右上がりの斜め線を表すBorderオブジェクトを、それぞれ取得できます。

BorderオブジェクトのLineStyleプロパティに、

斜め線をVBAでクリアする

定数・xlNoneを指定することで罫線を削除しています。

［スポンサードリンク］

Home » Excel VBA Rangeオブジェクト » 罫線・Borders » 斜め線をVBAでクリアする－Borders(xlDiagonalDown)・Borders(xlDiagonalUp)

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓ 上記の『Excel VBAユーザーのためのPythonプログラミング』の、元になったキンドル本です↓↓ 『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓ PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓ 数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓ 小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓ Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓ Excel VBAの経験がある方を対象に、Word VBAの基本をキンドル本としてまとめました↓↓ Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓ 図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓ グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓ Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓


「罫線・Borders」の記事一覧

検索


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

.