I would like to run something by you.

I have a VoucherF (Form) and a VoucherR (Report) and both of those have a DepositSubForm and a PayableSubForm depending on if the Voucher is a Deposit Voucher or a Payable Voucher using 2 checkboxes (Deposit, Payable).

I have the Form working great using a VBA sub procedure where if Deposit is True then the DepositSubForm is visiable (True) and vis-a-versa if Payable is True.

Now on to the question I'm using basically the same VBA code to try and do this for the VoucherR but the subforms never show up.

Any thoughts or what could I send you to see?

here is the VBA Code:

Public Sub Deposit_PayableCheck()

    If Deposit And Not Payable Then
        VoucherDepositDetailSubF.Visible = True
        VoucherPayableDetailSubF.Visible = False
        PayableTo.Visible = False
        Address.Visible = False
        PayableToCombo.Visible = False
        PayableFN.Visible = False
        PayableLN.Visible = False
    Else
        If Payable And Not Deposit Then
            VoucherDepositDetailSubF.Visible = False
            VoucherPayableDetailSubF.Visible = True
            PayableTo.Visible = True
            Address.Visible = True
            PayableToCombo.Visible = True
            PayableFN.Visible = True
            PayableLN.Visible = True
        End If
    End If
          
End Sub