トップ «前の日記(2007-10-26) 最新 次の日記(2007-11-01)» 編集

サイラスの本棚


2007-10-28

・ [Excel] 指定範囲に赤で二重下線を引く

With Sheet1.Range(sh1.Cells(1, 1), sh1.Cells(1, 30))
.Borders(xlEdgeBottom).LineStyle = xlDouble        '---罫線の種類
.Borders(xlEdgeBottom).Color = RGB(255, 0, 0)      '---RGB値で色を指定
End With
本日のリンク元