Access shuts down as soon as i click on a command button

[mp3909]

When I click on a command button on my main form, access just shuts down.
However, when I step through the code line by line, it works fine.

Below is the code in concern - can this code cause access to shut down when you run it without stepping through it line by line?

Private Sub cmdOutputTrade_Click()
    DoCmd.OpenForm "frmCustomReport", acPreview
    Forms![frmCustomReport].Controls("cboMyTables") = "Trade Exposure Report"
    Forms![frmCustomReport].Controls("lstMyFields").RowSource = "MergedTradeReport"
    Forms![frmCustomReport].Controls("lstMyFields").Requery
    DoCmd.OpenForm "frmCustomReport", acNormal
    SelectItemsInAListBox "Trade_Exposure_Report"

End Sub

[isladogs]

What is the purpose of the code as it makes no sense to me.
Is it running from frmCustomerReport or another form?

Opening a form in preview mode just shows you what it would like if you printed it. Perhaps you want acDesign insead?
If you want to open a form with specified conditions you normally use OpenArgs

[moke123]

Also what is

SelectItemsInAListBox "Trade_Exposure_Report"

my guess is your problem lies there.

[Micron]

why open a form, set control values, then open the same form again but with a different view??

AFAIK, this
Forms![frmCustomReport].Controls("cboMyTables")
is a less efficient way of doing this
Forms!frmCustomReport.cboMyTables

I would comment out the call to the other function and run the code in the same fashion that causes the crash and see what happens.

[mp3909]

Also what is

SelectItemsInAListBox "Trade_Exposure_Report"

my guess is your problem lies there.

this is a call to function called SelectItemsInAListBox passing a string parameter "Trade_Exposure_Report", that's all.
its not causing the issue as I commented out that line, ran the code and it still crashes.

[mp3909]

why open a form, set control values, then open the same form again but with a different view??

The combo box in the form opens up with a default value set to "Limit Exposure Report".
The combo box has 2 values - "Limit Exposure Report" and "Trade Exposure Report".

Obviously, I want it to open up with the combo value set to "Trade Exposure Report" hence why I have this line in my code

Forms![frmCustomReport]![cboMyTables] = "Trade Exposure Report"

.

Then I need to set the row source of the list box (i.e. lstMyFields) in that form to this query I have called "MergedTradeReport" so that it is populated with the values as being the field names in that query "MergedTradeReport" and that's why I have this line in my code

Forms![frmCustomReport]![lstMyFields].RowSource = "MergedTradeReport"

Anyways, I ran the below code with the call to the function commented out and still crashes:

Private Sub cmdOutputTrade_Click()
    DoCmd.OpenForm "frmCustomReport", acNormal
    Forms![frmCustomReport]![cboMyTables] = "Trade Exposure Report"
    Forms![frmCustomReport]![lstMyFields].RowSource = "MergedTradeReport"
    Forms![frmCustomReport]![lstMyFields].Requery
    'SelectItemsInAListBox "Trade_Exposure_Report"
End Sub

[moke123]

Do you have option explicit declared in each module?

Option Compare Database
Option Explicit

Is there any code that runs in frmCustomReport?

[CJ_London]

and if you step through the code, which line causes access to close?

[Rainlover]

Similar to Ajax; Run only one line at a time. You need to find the error.

If you don't know how to do this then ask. It is a tool that you will use many times in the future. So it is important that you learn.

PS. For our benefit add some comments to explain what you are doing or trying to do.

[Rainlover]

The problem my lie with the code behind the Command Button or perhaps a problem with its properties.

Suggest that you delete the Command Button then create a new one.