2013-09-18から1日間の記事一覧
こういうのが地味に便利。 Attribute VB_Name = "FormatSheet" Sub シート設定() Const 範囲 = "$A$1:$S$9" ' 罫線を引く With Range(範囲) '上段 With .Borders(xlEdgeTop) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With…
こういうのが地味に便利。 Attribute VB_Name = "FormatSheet" Sub シート設定() Const 範囲 = "$A$1:$S$9" ' 罫線を引く With Range(範囲) '上段 With .Borders(xlEdgeTop) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With…