2014-01-09 3 views
2

Так что проблема, которая, я считаю, пришла для других людей, но решения, которые я нашел, пока не работают.vba GoToRecord acGoTo не работает

Private Sub DROPDOWN_Change() 

    Me!FORMAL_CERT_PROCEDURE_TEST_SCRIPTS_THING.SetFocus 

    DoCmd.GoToRecord acDataForm, "FORMAL_CERT_PROCEDURE_TEST_SCRIPTS_THING", acGoTo, Me.DROPDOWN.Value 

End Sub 

Я получаю сообщение об ошибке «Объект„FORMAL_CERT_PROCEDURE_TEST_SCRIPTS_THING“не открыт.»

+0

Me! FORMAL_CERT_PROCEDURE_TEST_SCRIPTS_THING - это подформация – skevthedev

+0

Удивительный! я никогда не думал об этом так, и я очень ценю вашу помощь, пожалуйста, используйте это как ответ на этот вопрос, чтобы я мог дать вам кредит! – skevthedev

ответ

3

Когда вы оставляете ObjectType и Objectname варианты DoCmd.GoToRecord пустым, Access использует активный объект. Так как ваш код только что сделали SetFocus на контроле FORMAL_CERT_PROCEDURE_TEST_SCRIPTS_THING подчиненных, изменить DoCmd.GoToRecord заявления ...

Private Sub DROPDOWN_Change() 
    Me!FORMAL_CERT_PROCEDURE_TEST_SCRIPTS_THING.SetFocus 
    DoCmd.GoToRecord , , acGoTo, Me.DROPDOWN.Value 
End Sub 

В качестве альтернативы этого подхода, рассмотреть, можно ли сделать то, что вам нужно с контролем подформа магистерского ссылка/ребенком свойства полей. Возможно, Me.DROPDOWN может соответствовать полю в источнике записи субформы?