Search results

I have a main form with calculations and a subform with that has continuous lines and in the footer of the subform is a sum text box. In the subform after it moves off the Qty text box I have Me.Refresh 'Refreshes subform Me.Parent.Refresh 'Refreshes main form Problem is when its done...

Public Sub AddSpecial() Dim A As Currency If Me.SpecialOverRide = True Then Exit Sub A = Me.Cyl_TableTrav_Qty * Me.Cyl_TableTrav_Amt A = A + (Me.Cyl_Platten_Qty * Me.Cyl_Platten_Amt) A = A + (Me.Cyl_Stake_Qty * Me.Cyl_Stake_Amt) A = A + (Me.Cyl_Other_Qty * Me.Cyl_Other_Amt) A = A + (Nz(CylQ1, 0)...

I have a main form (Quote-4) that contains a procedure: Public Sub AddSpecial() Now from my subform (Quote-4 subfrm_Special) I need to access the previous procedure after TextBox1 and/or TextBox2 LostFocus - so I use the code: Private Sub TextBox1_LostFocus() Forms!

I have a field ControlsA on the main form which is a grand total field and the field subfrm_Total which is a total field off a subform within the main form so the control source is: =nz(

YEA! The the Nz function worked!

Ok I got that box to work, for the control source on the text box I made it the total box on the subform, how easy was that and I missed it. But now if the total in the subform contain null the text box in the main form that references is also null, I set the default value to 0 but that doesn't...

In the subform on the text box qty for the change event AfterUpdate I entered: Me.Parent!ControlName=subFormControlName I tested the whole form and the main form text box isn't updating. Any ideas why this is happening? I tried something similar when I

As part of the Form_Load event for the main form I have the following code: If [Form]!

Right, it doesn't update when I change a value in the subform which in turn changes the subform footer total.

Ok, I have tried every event procedure and I must be missing something. I have a continuous subform that has a text box "grand_total" in the subform footer that has =Sum([Controls_Detail_Line_Qty]*[Controls_Detail_Line_Amnt]) as the control source. Then on the main form I have a text box that...

I did code when the subform loads: Private Sub Form_Load() If Me.grand_total = "" Then Me.subfrm_grand_total = 0 Else Me.subfrm_grand_total = Me.grand_total End If End Sub This worked. Thanks!!

Ok, I left the grand total box with the control source as: =Sum([Controls_Detail_Line_Qty]*[Controls_Detail_Line_Amnt]) Then I created a new unbound box with the control source as: =If([subfrm_grand_total]="",0,[subfrm_grand_total]) I get #Name? is the new unbound box

i did as the control source of the grand total field: =If([Controls_Detail_Line_Qty]="",0,(Sum([Controls_Detail_Line_Qty]*[Controls_Detail_Line_Amnt]))) - even tried =If([Controls_Detail_Line_Qty]is null,0,(Sum([Controls_Detail_Line_Qty]*[Controls_Detail_Line_Amnt]))) neither worked

The subform is based on the table and then when the subfrm was added to the main form the links were based on the quoteid field

where would I do this? In VB or in the properties?

I have a subform called Line Items that contains fields description, count, and price. This subfrm doesn't always contain data but yet there is a grand total field in the form footer. My problem is if there is no data I need this grand total field to equal 0, I have tried a couple things that...

Thanks, I used DLookup: Me.QID = DLookup("[QuotID]", "MultiQuote") Worked great!

I had this code previously in VB for a form: Me.QID = [Forms]!