여러시트 CRUD 처리
Sheet 명을 ; 구분으로 여러 시트 처리 묶음 처리 할 경우 하나의 transaction 으로 처리됩니다.
(오류 발생 할 경우 경우 전체 rollback 처리됨)
Syntax
Public Function MultiCRUD ( wbobj As Workbook, sheetList As String ) As Long
Parameters
wbobj |
|---|
Type: Excel.Workbook
CRUD 할 Workbook 개체
sheetList |
|---|
Type: String
worksheet 명 리스트, ;문자로 구분
Return Value
Type: Long
정상일 경우 : 처리건수
오류 일경우 : 오류코드(음수)
Example
Sub MultiCRUDTest()
Set mxmodule = Application.COMAddIns.Item("iMATRIX.ExcelModule").Object
mxmodule.xapi.MultiCRUD ThisWorkbook, "U1;U2"
If mxmodule.xapi.LastErrorCode <> 0 Then
mxmodule.xapi.MessageBox mxmodule.xapi.LastErrorMessage, vbInformation, "i-MATRIX"
Else
mxmodule.xapi.MessageBox "Complete." & vbCrLf & "Info" & mxmodule.xapi.ResponseData, vbInformation, "i-MATRIX"
End If
End Sub