MS 액세스 목록에없는 경우 콤보 상자에 항목 추가

Question

액세스 폼이 있습니다. 거기에 콤보 상자에 항목을 추가하는 방법을 알고 싶습니다. 내 콤보 상자가 값 모드에 있습니다.

Answer 1

양식을 디자인 모드로 변경하고 새 값을 추가하지 않고도 행 소스를 영구적으로 변경할 수는 없습니다. 코드를 사용하여이 작업을 수행 할 수도 있지만 사람들이 작업 할 때는 좋은 생각이 아닙니다. 가장 쉬운 방법은 작은 테이블을 만들고 그 테이블에 값을 추가하는 것입니다. 양식을 닫으면 새 값이 저장됩니다.

앨런 브라운은이 작업을 수행하는 방법에 대한 설명이 있습니다 http://allenbrowne.com/ser-27.html

이 그가 보여줍니다 아이디어 중 하나입니다

Private Sub CategoryID_NotInList(NewData As String, Response As Integer) 
    Dim strTmp As String 

    'Get confirmation that this is not just a spelling error. 
    strTmp = "Add '" & NewData & "' as a new product category?" 
    If MsgBox(strTmp, vbYesNo + vbDefaultButton2 + vbQuestion, "Not in list") = vbYes Then 

     'Append the NewData as a record in the Categories table. 
     strTmp = "INSERT INTO Categories (CategoryName) " & _ 
      "SELECT """ & NewData & """ AS CategoryName;" 
     DBEngine(0)(0).Execute strTmp, dbFailOnError 

     'Notify Access about the new record, so it requeries the combo. 
     Response = acDataErrAdded 
    End If 
End Sub 

Answer 2

limit to list 속성을 true로 설정해야합니다.

그런 다음 잠재적으로 콤보 상자에 값을 추가하는 On Not In List 이벤트에 일부 코드를 추가하십시오. Here is a tutorial. 다른 답변을 볼 수 있습니다.

일반적으로 콤보 상자의 값을 저장하는 테이블을 사용하는 것이 좋습니다. 값 목록을 사용하여 사용자가 바로 가기 메뉴를 비활성화하지 않으면 콤보 상자에서 마우스 오른쪽 단추를 클릭하여 Edit List Items...을 선택하고 목록으로 제한되도록 설정하더라도 목록을 수정하십시오. 이는 목록에 제한하려는 모든 제한을 효과적으로 상쇄합니다. 들.