Navigieren zu einer anderen Registerkarte im Navigationsunterformular
In einer MS Access 2010-Datenbank habe ich eine Listbox, deren After-Update-Prozedur (unter anderem) zum Navigieren zu einer bestimmten Registerkarte in einem Navigations-Unterformular benötigt. Ich kann veranlassen, dass die SourceObject-Eigenschaft des Navigations-Unterformulars geändert wird, aber die ausgewählte Registerkarte wird nicht geändert, sodass der Benutzer das richtige Quellobjekt mit der falschen ausgewählten Registerkarte sieht. Das sieht unprofessionell aus. Wie kann ich sowohl die ausgewählte Registerkarte als auch das Quellobjekt ändern?
Ich habe eine vereinfachte Datenbank hochgeladen, in der das Problem erneut auftrittDiese Filesharing-Site.
Das Listenfeld, dessen After-Update-Methode geändert werden muss, wird aufgerufenlstbxClients
. Hier ist mein aktueller Entwurf der Afterupdate-Methode, die derzeit einen Fehler ausgibt:
Private Sub lstbxClients_AfterUpdate()
Dim rst
Set rst = Me.RecordsetClone
rst.FindFirst "ClientNumber = " & lstbxClients.Column(0)
Me.Bookmark = rst.Bookmark
'Forms!Main!NavigationSubform.Form!NavigationSubform.SourceObject = "qryListCommunicationForms"
DoCmd.BrowseTo acBrowseToForm, "qryListCommunicationForms", "Forms!Main!NavigationSubform.Form!NavigationSubform"
Form.NavigationSubform " "
'Forms!Main!NavigationSubform.Form!NavigationSubform.SelectedTab = "CommFormsNavBtn"
Set rst = Nothing
End Sub
Wie ändere ich den obigen Code so, dass sowohl die ausgewählte Registerkarte als auch das Quellobjekt des Navigationsunterformulars geändert werden, wenn der Benutzer auf einen anderen Datensatz in der Listbox klickt?