Dim instance As ExcelSheet Dim col1 As Integer '1から始まる開始列番号 Dim row1 As Integer '1から始まる開始行番号 Dim col2 As Integer '1から始まる終了列番号 Dim row2 As Integer '1から始まる終了行番号 Dim left As Integer '範囲の左側の罫線太さ Dim top As Integer '範囲の上側の罫線太さ Dim right As Integer '範囲の右側の罫線太さ Dim bottom As Integer '範囲の下側の罫線太さ Dim horizon As Integer '範囲内の行の罫線太さ Dim vertical As Integer '範囲内の列の罫線太さ instance.RangeBorderWeight(col1, row1, col2, row2, left, top, right, bottom, horizon, vertical)
'ExcelSheetクラス RangeBorderWeightメソッド Public Class AddIn Private es As ExcelSheet Public Sub New() es = New ExcelSheet() es.SelectSheet(1) es.RangeValue(2, 2, 5, 5, 100) 'A1:E5 es.RangeBorder(2, 2, 5, 5, 1, 1, 1, 1, 3, 3) es.RangeBorderWeight(2, 2, 5, 5, 4, 4, 4, 4, 3, -1) es.Save("D:\tmp\sample2.xlsx") es.Dispose() End Sub End Class
このページのQRコード
便利ウェブサイト
便利 Android アプリ
便利 iOS(iPhone,iPad) アプリ