Search results

  1. P

    Changing Rows to Columns

    If you require your output to show Customer, the number of polices, and the policy number for each Customer then you will need to use code and do your data manipulation using an array etc.
  2. P

    Error 3051 encountered

    This may help you, I have a database with just a switchboard and menu items to access various databases on our network. This saves the user from having a short cut for each database. When the button is pressed a module similar to below is called depending on the database. j:\_site etc is the...
  3. P

    Unable to get Field to update with Total

    I am glad to assist. I hope you can recharge your batteries by sleeping
  4. P

    Unable to get Field to update with Total

    I created a form to simulate your input with four fields Unit Price, Quantity, Discount and Price. I entered 14 for the unit price, 0.1 for the discount and 10 for the quantity and the code below in the after upodate event gave the correct price of 126. I did not use the Price After Update...
  5. P

    Unable to get Field to update with Total

    Is it Discount or Discount Price? If Discount Price then Me.Discount shouldl be [Me.Discount price]
  6. P

    ComboBox Requery doesn't Work

    In your first post you did not DIM RstEmployees.
  7. P

    Sum Total #error in continuous sub-form footer

    Glad to assist. This is also true when totalling in a report you must use the same format. i.e. total the field not the text box.
  8. P

    comparing 3 variables - help please

    Smig Here is an updated version after looking at the code again I did not consider the possibility that the three variables maybe equal. The changes are shown in bold, I also moved the debug.prints Sub test_min_max() Dim int_Var1 As Integer Dim int_Var2 As Integer Dim int_Var3 As Integer...
  9. P

    comparing 3 variables - help please

    Smig Here is some code for you. I set some values to the variables and added some debug.print to display the result. Sub test_min_max() Dim int_Var1 As Integer Dim int_Var2 As Integer Dim int_Var3 As Integer Dim max_val As Integer Dim min_val As Integer int_Var1 = 200 int_Var2 = 100...
  10. P

    Sum Total #error in continuous sub-form footer

    Sharq Here is an updated version that now works. When calculating totals you must total the field names not the text e.g. Total Units must be calculated using =sum([SLRUnits]) not =Sum([Units]). Units is not a field name I have changed your subform and the calcualtions appear to work. I...
  11. P

    AllowByPassKey No Use Security

    Have a look in the Help file for AllowBypassKey Property. This will give you an example how to set the property to FALSE. I have a database that I use to set various properties of a database in 2003. The bypass key setting works in 2007. If you want to tinker with this database reply to my...
  12. P

    Sum Total #error in continuous sub-form footer

    Try =nz(Sum([units])). Check that units is a Number not Text data type.
  13. P

    Sum Total #error in continuous sub-form footer

    You will need something like this in the footer of your subform TotalUnits=nz(sum([Units])) TotalBankedAmt=nz(sum([BankedAmt])) TotalOtherAmt=nz(sum([OtherAmt])) I use the above format to give me the total of the account due, total amount that I have paid, then the third total gives me the...
  14. P

    AllowByPassKey No Use Security

    Have you looked at setting the Input Mask of the relevant text fields to PASSWORD?
  15. P

    i wanna code for filter by form

    You may be given the solution if you are more specific in what you are trying to filter. Have you searched this forum? There are a few discussions in the Forms forum that talks about filtering on a form.
  16. P

    DoCmd.RunSQL strSQL - Slowly killing my brain

    This may help you as I had problems with the WHERE criteria when copying and pasting SQL into VBA. I had to split the where into various strings. The "'" below is " ' " as the fields are strings. sqlstring1 = "SELECT tbl_locations.location_direction, tbl_locations.location_name " & _ "FROM...
  17. P

    Issue with Requery

    Yes, I open the form that I want then close the form that I came from.
  18. P

    I am getting a Run-time error 13: Type-mismatch

    I am glad to assist. I too started like you a novice and learnt a lot from forums like this from experts willing to share their experience. So now I am returning the favours and also learning at the same time.
  19. P

    I am getting a Run-time error 13: Type-mismatch

    James You need code similar to this make sure you have Resume Exit as shown below. Err_bSave_Click: If Err = 2046 Then 'The command or action Undo is not available now Exit Sub Else MsgBox "Error NUmber " & Err.Number & " Description " & Err.Description Resume Exit_bSave_Click End If...
  20. P

    Issue with Requery

    In the open event of FrmLoanApplicationsMain you could use Docmd.Close "form name".
Back
Top Bottom