조건 컨트롤의 속성 값을 가져옵니다.
Syntax
public DatasetModel AddDataset( Excel.Workbook wbobj, string dsCode, string dsName, enOutputType outputType, Excel.Range target )
Parameters
wbobj |
|---|
Type: Excel.Workbook
현재 Workbook object
dsCode |
|---|
Type: String
Dataset Key값
dsName |
|---|
Type: String
Dataset 표시명
outputType |
|---|
Type: enOutputType
| outNone | 0 | |
| outList | 1 | 표 형태 출력 |
| outPivot | 2 | Pivot 형태 출력 |
target |
|---|
Type: Excel.Range
출력 위치
Returns
Type: Object (DatasetModel)
정상일 경우 : Object
오류 일경우 : null
6.2 version
Example
Sub CreateDataset()
Dim mxmodule As Object
Dim ds As Object
Set mxmodule = Application.COMAddIns.Item("iMATRIX.ExcelModule").Object
Set ds = mxmodule.viewmodel.activebook.CreateDataset("DS2", "DS2") 'datasetCode, datasetName
ds.sourcesql = "select * from mtx_user"
ds.ConnectionCode = "MTXRPTY" 'DBMS_CODE
mxmodule.viewmodel.activebook.AddDataset ds
mxmodule.xapi.AddDataset ThisWorkbook, "DS2", "DS2", 1, Range("D1!A1")
End Sub
7.0 version
- 같은 데이타셋 코드로 요청시 수정 됨.
Example
Sub add_dataset()
On Error Resume Next
Dim mxModule As Object
Dim ds As Object
Set mxModule = Application.COMAddIns.Item("iMATRIX.ExcelModule").Object
Set ds = mxModule.viewmodel.activebook.CreateDataset("DATASET_CODE1", "DSSET_NAME1") 'datasetCode, datasetName
ds.sourcesql = "SELECT ver, own, data_name, row_cd, col_cd, n_values, c_values FROM mx_epa_doc where wbook_name=:VS_DATASET"
ds.ConnectionCode = "MTXRPTY"
'출력위치
ds.OutputAddress = "'T1'!$C$5"
mxModule.viewmodel.activebook.AddDataset ds
mxModule.xapi.AddDataset ActiveWorkbook, "DATASET_CODE1", "DSSET_NAME1", 1, Sheets("T1").Range("C5")
End Sub