페이지 이력

Sub CreateDataset()
    Dim mxmodule As Object
    Dim ds As Object
    Set mxmodule = Application.COMAddIns.Item("iMATRIX6iMATRIX.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