특정 Cell 을 더블클릭 할때 데이터 입력 폼 을 사용합니다아래와 같은 선택입력 양식 을 사용하여 값을 입력 받을 수 있습니다.
| 코드 블럭 | ||||
|---|---|---|---|---|
| ||||
public DataItem ShowDataForm( Excel.Range target, string dsName ) |
Parameters
target |
|---|
Type: Excel.Range
데이터 입력 폼 을 띄울 cell
dsName |
|---|
Type: String
Dataset 표시명
Return Value
Type:관리자의 Dataset 명
** 2021.07.08 HotFix 버전 이후 추가 기능
width |
|---|
Type: int
데이터 입력 폼의 Width Value
height |
|---|
Type: int
데이터 입력 폼의 Height Value
**
Returns
Type: Object (DataItem)
정상일 경우 : Object
오류 일경우 : null
Dataset 의 결과 에서 선택한 레코드 가 return 됩니다.
GetValue(index) 를 이용하여 원하는 컬럼의 값을 선택할 수 있습니다.
| 코드 블럭 | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
'========================================================================== '특정 Sheet 더블클릭하여더블클릭 입력이벤트 폼 생성후 해당 cell 에 값 지정하는 예제 정의 '========================================================================== Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) DimCancel mxmodule As Object= True '기본 더블클릭 기능 취소 ShowDatasetForm Target '입력폼 생성 End Sub '========================================================================== '입력 폼 생성후 해당 cell 에 값 지정 '========================================================================== Public Sub ShowDatasetForm(ByVal Target As Range) Dim resultmxmodule As Object Dim result As Object Cancel = True Set mxmodule = Application.COMAddIns.Item("iMATRIX6iMATRIX.ExcelModule").Object Set result = mxmodule.xapi.ShowDataForm(Target, "DS1", 310, 420) 'cell object, dataset 명, form 너비, form '첫번째높이 컬럼의 값을 사용 If result Is Nothing = False Then Target.Value = result.GetValue(1) '2번째 컬럼의 값을 사용 할경우 result.GetValue(2) End Sub |