컴퓨터/기타
VBA]ListBox- 선택한 줄의 2번째 컬럼 값 가지고 오기
예섬수진
2009. 12. 18. 20:23
For i = 0 To TCGenDialog.lbEnum.ListCount + 1
If TCGenDialog.lbEnum.Selected(i) = True Then ' 선택한 라인 찾기
TCGenDialog.tbParameterValues.value = TCGenDialog.lbEnum.List(i, 1) ' 0부터 시작히므로 2번째 컬럼은 1이 됨
GoTo Update ' break가 안되므로 GoTo 문을 이용
End If
Next
Update:
If TCGenDialog.lbEnum.Selected(i) = True Then ' 선택한 라인 찾기
TCGenDialog.tbParameterValues.value = TCGenDialog.lbEnum.List(i, 1) ' 0부터 시작히므로 2번째 컬럼은 1이 됨
GoTo Update ' break가 안되므로 GoTo 문을 이용
End If
Next
Update: