여러시트 CRUD 처리
Sheet 명을 ; 구분으로 여러 시트 처리 묶음 처리 할 경우 하나의 transaction 으로 처리됩니다.
(오류 발생 할 경우 경우 전체 rollback 처리됨)
| 코드 블럭 | ||||
|---|---|---|---|---|
| ||||
Public Function MultiCRUD ( wbobj As Workbook, sheetList As String ) As Long |
Parameters
wbobj : CRUD 할 Workbook 개체
sheetList : worksheet 명 리스트, ;문자로 구분
Return Value
Type: Long
처리건수정상일경우 오류코드오류일경우 음수
| 코드 블럭 | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
Sub UpdateUIStateTest()
Dim mxmodule As Object
Set mxmodule = Application.COMAddIns.Item("ExcelModule.AddinModule").Object
mxmodule.xapi.MultiCRUD ThisWorkbook, "U1;U2;U3"
End Sub |