VBA 콤보 상자에서 여러 데이터 가져 오기

여러 데이터를 선택할 수있는 ComboBox에서 데이터를 가져 오려고합니다. 부울 값이 항상 false입니다 몇 가지 이유를 들어VBA 콤보 상자에서 여러 데이터 가져 오기

Dim ind As Integer 
Dim bl As Boolean 
ind = 0 
While ind < Forms!Rec!CONTACT.ListCount 
bl = Forms!Rec!CONTACT.Selected(ind) 
If bl Then 
txt1 = txt1 + "Contact : " & Forms!Rec!CONTACT.Column(4, ind) & " " & Forms!Rec!CONTACT.Column(2, ind) & vbCrLf & Forms!Rec!CONTACT.Column(3, ind) & vbCrLf & Forms!Rec!CONTACT.Column(6, ind) 
End If 
ind = ind + 1 
Wend

내 코드는 다음과 같다.

아이디어가 있으십니까?

미리 감사드립니다.

출처

2017-04-21 Guillaume1077

위의 코드는 어디에 있습니까? 이 코드가 실행될 때 양식이 여전히로드되어 있습니까? –

나는 그저 위조했다고 깨달았다 ... 이 코드는 폼의 데이터로부터 파워 포인트를 생성하는 것을 목표로하는 또 다른 코드에있다. 코드를 실행할 때 양식이 열려 있습니다. – Guillaume1077

ComboBox에서 선택한 항목을 하나만 가질 수 있다고 생각합니다. 대신 ListBox를 사용할 수 있습니다. –

나는 결국 잘못된 것을 발견했습니다.

Selected 또는 ItemsSelected 대신 ComboBox.OldValue를 사용해야합니다.

이 특정 기능을 사용하면 선택한 항목의 모든 위치가 배열로 표시됩니다.

출처

2017-04-26 15:43:52 Guillaume1077

VBA 콤보 상자에서 여러 데이터 가져 오기

답변

관련 문제