PutURect

下線を引く

Public Sub PutURect(
　　ByVal Row As Integer - 行番号
　　ByVal Col As Integer - 列番号
)

Row

行番号

Col

列番号

各セルの下線を設定する。