ねこになりたい

おふとんと朝の別れをするのが辛い人向けです。正論で殴らず見守ってあげてください。

Excelマクロ覚書 ~罫線編~

図書館で借りてきた某書籍の覚書です。

 

 

【罫線を設定する】

罫線を設定するにはFontメソッドのBordersプロパティを使う。

(sつけるのを忘れないように!)

Rangeオブジェクト.Borders.LineStyle = 値

※指定できる値

xlContinuous :実践
xlDash :破線
xlDashDut :一点鎖線
xlDashDotDot :二重鎖線
xlDot :点線
xlDouble :2本線
xlSlantDashDot :斜破線
xlLineStyleNone :罫線の設定を解除する

Range("A1").Borders.LineStyle = xlContinuous  'A1セルに実践の罫線をつける'

【セル下側に罫線を設定する】

セル下側に罫線を設定するにはBordersプロパティで指定する。

Rangeオブジェクト.Borders(値)

※指定できる値

xlDiagonalDown :セルの左上隅から右下への罫線
xlDiagonalUp :セルの左下隅から右上への罫線
xlEdgeBottom :下側の鎖線
xlEdgeLeft :左端の罫線
xlEdgeRight :右端の罫線
xlEdgeTop :上側の罫線
xlInsideHorizontal :指定した範囲内のすべてのセルの水平罫線
xlInsideVertical :指定した範囲内のすべてのセルの垂直罫線
Range("A1").Borders(xlEdgeRight).LineStyle = xlDash   'A1セルの下側に破線をつける'

【罫線の色を設定する】

セル下側に罫線を設定するにはBordersプロパティで指定する。

Range("A1").Borders.Color = RGB(0, 0, 255)   'A1セルの罫線の色を青に設定'

【罫線の太さを変更する】

罫線の太さを変更するにはWeightプロパティで指定する。

Rangeオブジェクト.Bordersオブジェクト.Weight = 値

※指定できる値

xlHairline :細線(最も細い罫線)
xlMedium :普通
xlThick :太線(最も太い罫線)
xlThin :極細
Range("A1").Borders(xlEdgeBottom).Weight = xlThick   'A1セルの下側に太線をつける'

【表示形式をカンマ区切りにする】

書式をカンマ区切りにするにはNumberFormatLocalプロパティを使う。

Rangeオブジェクト.NumberFormatLocal = 設定値

※指定できる値

# :1桁の数字。指定した桁数未満の場合は表示されない。
0 :1桁の数字。指定した桁数未満の場合でも表示される。
Range("A1").NumberFormatLocal = "\#,##0"   'A1セルに3桁までの金額が表示される。'

【表示形式を指定した日付にする】

書式を日付(yyyy/mm/dd)にする場合も、NumberFormatLocalプロパティを使う。

Rangeオブジェクト.NumberFormatLocal = 設定値

※指定できる値

yy :西暦年(下2桁)
yyyy :西暦年(4桁)
g 元号(アルファベット)
gg 元号(先頭文字)
ggg 元号
e :月(1~12)
mmm :月(英語簡略表記)
mmmm :月(英語表記)
mmmmm :月(英語表記の先頭文字)
d :日(1~31)
dd :日(01~31)
ddd :曜日(英語簡略表記)
dddd :曜日(日本語簡略表記)
aaa :曜日(日本語簡略表記)
aaaa :曜日(日本語表記)
h :時(0~23)
hh :時(00~23)
m :分(0~59)
mm :分(00~59)
s :秒(0~59)
ss :秒(00~59)
Range("A1").NumberFormatLocal = "YYYY/MM/DD"   'A1セルにyyyy/mm/dd形式で日付を表示する。'

【セルの塗りつぶしの設定をする】

セルを塗りつぶすには、Interiorプロパティを使う。

Rangeオブジェクト.Interior.Color = RGB(0, 0, 255)

Rangeオブジェクト.Interior.Color = 色名

※指定できる色

rgbAqua :水色
rgbBlack :黒
rgbBlue :青
rgbForestGreen :フォレストグリーン
rbgGreen :緑色
rgbLime :黄緑
rgbNavy :ネイビー
rgbRed :赤
rgbWhite :白
rgbYellow :黄
Range("A1").Interior.Color = rgbBlue   'A1セルを青にする。'

【セルの背景色の設定をする】

セルの背景色の設定をするには、ThemeColorプロパティを使う。
また、TintAndShadeプロパティを使うことで基本色の割合を設定できる。
(正の値だと白、負の値だと黒)

Rangeオブジェクト.Interior.ThemeColor = 色名

Rangeオブジェクト.Interior.TintAndShade = 数値

※指定できる色

xlThemeColordark1 :白色
xlThemeColorLight1 :黒
xlThemeColorDark2 :ベージュ
xlThemeColorLight2 :濃い青
xlThemeColorAccount1 :青
xlThemeColorAccount2 :赤
xlThemeColorAccount3 :オリーブ
xlThemeColorAccount4 :紫
xlThemeColorAccount5 :アクア
xlThemeColorAccount6 :オレンジ
Range("A1").Interior.ThemeColor = xlThemeColorDark2   'A1セルの背景色をベージュ基調の色にする。'