Lables, TextBoxes 및 ListBox로 Excel 시트를 채우는 약간의 코드를 만들었습니다. ListBox를 .List = Sheets (). Range (). Value로 채운 후 항목을 클릭하여 선택할 수 없습니다. 시트를 저장하면 닫았다가 다시 열면 정상적으로 작동합니다.
http://blogs.technet.com/b/the_microsoft_excel_support_team_blog/archive/2014/12/11/forms-controls-stop-working-after-december-2014-updates-.aspx를 확인했습니다.
하지만 오류가 발생하지 않아 잘못된 수정 인 것 같습니다.
KB에서 다음 http://support.microsoft.com/kb/3025036/EN-US 를 검색 할 때
증상이 내가 겪고있는 것과 다릅니다.
또한 Sheets ()를 사용해 보았습니다. 여기에 게시 된대로 활성화 : 파일을 열 때 Excel ActiveX Listbox를 사용할 수 없음
그러나 그것은 도움이되지 않았거나 잘못 구현하고 있습니다.
이것은 ListBox를 만드는 코드입니다.
Private Sub Create_ListBox_ActiveXControlProperties()
Dim oLISTBOX As OLEObject
Set oLISTBOX = ActiveSheet.OLEObjects.Add(classtype:="Forms.ListBox.1", Top:=35, Width:=500, Left:=650, Height:=600)
ActiveSheet.OLEObjects("ListBox1").Object.Font.Size = 14
ActiveSheet.OLEObjects("ListBox1").Object.ListStyle = 0
ActiveSheet.OLEObjects("ListBox1").Object.List = Sheets("Search Criteria Control").Range("g1:g21").Value
End Sub
누구든지 이것에 대한 해결책을 찾을 수있는 곳을 제안 할 수 있습니까?
설명은 할 수 없지만, Activesheet.Select
서브 끝에 추가 하면 아이템을 선택할 수 있습니다.
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다