'宣言
 
Sub SetColumnUsed( _
   ByVal sheetView As Object, _
   ByVal valueElementCount As Integer, _
   ByVal styleElementCount As Integer, _
   ByVal formulaElementCount As Integer, _
   ByVal valueColElementCount As Integer, _
   ByVal styleColElementCount As Integer, _
   ByVal formulaColElementCount As Integer, _
   ByVal valueEndIndex As Integer, _
   ByVal styleEndIndex As Integer, _
   ByVal formulaEndIndex As Integer, _
   ByRef valueColUsed() As Object, _
   ByRef styleColUsed() As Object, _
   ByRef formulaColUsed() As Object _
)