는 "잘못된 프로 시저 또는 인수가"오류

Question

내가 액세스 DB를 상속하고,이 오류 메시지와 함께 열려고 할 때 밖으로 erroring된다

런타임 오류 '5':
잘못된 프로 시저 또는 좀 G에서이 전 검사를 추가 한

Set cbMainMenu = CommandBars.Add(Name:="OIG Main Menubar", _ 
Position:=msoBarTop, MenuBar:=True, Temporary:=True) 

: 인수

은 내가 VBE에서 다음 코드를 추적 한 연구를 oogling,하지만 여전히 (오류 처리의 변화 및없이) erroring 될 때 작동하지 않습니다

On Error Resume Next 
    Application.CommandBars(cbMainMenu).Delete 
    On Error GoTo 0 

은 누구나 어떤 아이디어를 가지고, 또는이 오류를 해결하기 위해 올바른 방향으로 날 지점 수 ? 나는 잠시 그것을 계속 해보겠다.

편집 :

이 메인, 초기 오류로 표시되지 않습니다. 지금 찾으려고 노력 중이고 찾으면 다시 게시 할 것입니다.

EDIT2 :

Set cbcToolsDBCompact = cbpToolsMenu.Controls.Add(Id:=CommandBars("Menu Bar").Controls("Tools").CommandBar.Controls("Database Utilities").CommandBar.Controls("Compact And Repair Database...").Id) 

EDIT3 :을 위의 코드를 변경

이 무엇 실제로 내가 알아서 할 수 있는지 주위를 둘러 볼 것, 오류의 원인이다 받는 사람 :

Set cbcToolsDBCompact = cbpToolsMenu.Controls.Add(Id:=2071) 

이 문제가 수정되어 comact/repair 옵션이 있습니다. 지금. (그리고 심지어 작동합니다). 아무도 의견이 아닌 구체적인 답변을 게시하지 않았으므로 맨 아래에 '자신의 질문에 답변하십시오'옵션을 사용하여 미래에 대한 답변을 얻을 것입니다. 또한, 나는이 여기에 대한 코드를 발견

MS Access: how to compact current database in VBA

Answer 1

여기에 내 질문에 답하십시오.

이 문제는 "압축 및 복구 데이터베이스"옵션을 Access 2003의 위치에서 옮기는 문제였습니다.

VBA 코드가 메뉴 옵션으로 추가되어, 2003 년,이 코드가 어떻게 생겼는지입니다 :

Set cbcToolsDBCompact = cbpToolsMenu.Controls.Add(Id:=CommandBars("Menu Bar").Controls("Tools").CommandBar.Controls("Database Utilities").CommandBar.Controls("Compact And Repair Database...").Id) 

는 2007 년,이 문제에 따라, 여기가 MS Access: how to compact current database in VBA 방법이 필요하다

Set cbcToolsDBCompact = cbpToolsMenu.Controls.Add(Id:=2071) 

Answer 2

내 생각 엔 그것은 참조 문제라는 것이다.

은 Visual Basic IDE에서

, 도구/참조를 클릭

팝업 대화 상자에서 마이크로 소프트 오피스 X.0 개체 라이브러리를 찾습니다 :

합니까 그 옆에 "실종"이라는 단어가 있습니까? 그렇다면 문제가됩니다.

누락 된 참조를 선택 취소하고 아래로 스크롤하여 사용중인 Office 버전과 함께 설치된 버전을 선택하십시오.