Hi..I tried to use the Navigation Form that comes with Access 2010 but found it problematic so have tried to make something similar by placing the 5 subforms, these contain lists of records eg clients, entities, products on the main form, the visible property of them is set to No as are command buttons on the main form used to navigate to reports and other forms based on each of the subforms, the OnClick event of the command buttons on the main form are set to make the relevant subforms and related command buttons on the main form visible, these command buttons work fine, it is the command buttons with the embedded macro on the subforms that aren't working when opened thru the Main Form, which are used to search for a record on the subform, attached is a screen print of the Main Form if this helps and part of the code on the main form which makes the relevant subform and its command buttons visible and the code behind these buttons to open further reports and forms
Private Sub cmdActiveQROPS_Click()
'Hide all but Application List
Me.ApolloQROPS.Visible = False 'MainForm
Me.frmAQApplicationList.Visible = True 'Application List
Me.cmdEntityCards.Visible = True 'Application List
Me.cmdActivity.Visible = True 'Application List
Me.cmdStatement.Visible = True 'Application List
Me.cmdAssetMgmt.Visible = True 'Application List
Me.frmAQIFAList.Visible = False 'IFA List
Me.cmdNewIFA.Visible = False 'IFA List
Me.cmdIFAReports.Visible = False 'IFA List
Me.frmAQINTList.Visible = False 'INT List
Me.cmdNewINT.Visible = False 'INT List
Me.cmdINTReports.Visible = False 'INT List
Me.frmAQContactsList.Visible = False 'Client List
Me.cmdNewClient.Visible = False 'Client List
Me.frmAQTransferSchemeList.Visible = False 'TransferScheme List
Me.cmdNewScheme.Visible = False 'TransferScheme List
Me.frmAQAssetList.Visible = False 'Investment List
Me.cmdNewAsset.Visible = False 'Investment List
Me.frmAQAccountsModule.Visible = False 'Accounts Module
Me.frmAQTrackingOptions.Visible = False 'Tracking Options
End Sub
Private Sub cmdActivity_Click()
DoCmd.OpenForm "frmAQTransactionList", acNormal, "", "[ClientIDFK]=[Forms]![AQNavigationForm]![frmAQApplicationList]![ClientIDFK]"
End Sub
Private Sub cmdStatement_Click()
DoCmd.OpenForm "frmAQClientStatementReports", acNormal
End Sub
Private Sub cmdAssetMgmt_Click()
DoCmd.OpenForm "frmAQAssetMgmtList", acNormal, "", "[ClientID]=[Forms]![AQNavigationForm]![frmAQApplicationList]![ClientIDFK]"
End Sub
Any help or advice appreciated, code rather than the embedded macro would probably be better, if anyone could help with that?
thanks Fi