Recent content by Sneale

  1. S

    Email single record report

    Below is the code i have and it seems to work well. Thank you for the help! Private Sub Command116_Click() Const MESSAGETEXT = "No current record." If Not IsNull(Me.ID) Then Me.Dirty = False DoCmd.OpenQuery "qryUpdateSupplierName", acViewNormal DoCmd.OpenReport...
  2. S

    Email single record report

    Hello, I have a report that needs to be emailed to specific email addresses for each record as the table is updated. I have 2 tables, one called tblAuditInfo and one called tblSupplier. I have an input form called frmAuditDataEntry. I also have a report called Receiving Audit. My goal is to...
  3. S

    Clearing a text box on form as well as stopping VBA code

    Thank you for the information! What I am making is a database to compile a warehouse inventory. The barcodes on the packages all have a prefix (v for suppler, z for location, p for part number etc.) so the warehouse management system know which barcode is scanned. I was planning on making...
  4. S

    Clearing a text box on form as well as stopping VBA code

    The controls are all named beginning with txt so txtSupplier, txtPackage, txtLocation
  5. S

    Clearing a text box on form as well as stopping VBA code

    Still running into an issue where all the text boxes on the form are being cleared with the Me.Undo Is there a way to clear just the one text box? I have 3 that if the data is scanned incorrectly, I just want that one to clear out. so like below, if the user scans lets say a part number to the...
  6. S

    Clearing a text box on form as well as stopping VBA code

    That works great! Thank you so much for the help!
  7. S

    Clearing a text box on form as well as stopping VBA code

    Sorry I don't follow. I know very little about VBA and am building this on the fly. Do you by chance have an example?
  8. S

    Clearing a text box on form as well as stopping VBA code

    That works, but I only want it to clear the location field. this cleared all fields on the form. As for txtLocation vs. Location, that was a typo on my end. I have adjusted that but still have the issue where it will allow the incorrect data to be saved and go to the next record.
  9. S

    Clearing a text box on form as well as stopping VBA code

    Hello, I have 2 issues that I need assistance with. First, I want to have the text box clear out if the incorrect info is input to it. I have tried Me.Location = "" and Me.Location = Null after the message box, neither of which seem to work. I also have the below code and need it to stop when...
  10. S

    text box to set print copies?

    Hello, I have a report that I need to be able to adjust the qty of the copies printed using a textbox on my form. I have the below code that works flawlessly for a set amount of copies. sometimes I will need to print 1 copy and sometimes I will need to print 2,3,4,5 etc. the text box on my form...
  11. S

    Data Prefix show error if not correct

    That works well for the fields PartNumber and Location where there is only one possible prefix. in the Package ID field, there are 3 potential prefixes. how would that have to be written?
  12. S

    Data Prefix show error if not correct

    Hello, I am working on a simple database to do a physical inventory in a warehouse. I have a table with 3 fields, PartNumber, PackageID, and Location. I have a form where the user will scan the data from each package linked to those fields on the table. The barcode data that they will be...
  13. S

    Solved print 4 copies of a report through vba

    That worked great! thank you very much
  14. S

    Solved print 4 copies of a report through vba

    Hello I have a form that I created to enter some data and them have a report print out when you click a button. I have the following code in the button. Private Sub Command20_Click() Const MESSAGETEXT = "No current record." Dim strCriteria As String strCriteria = "ID = " & Me.ID If Not...
  15. S

    Total a Calculated field?

    Hello, I am trying to get a total amount in the footer of my report. I have a calculated field called txtGCTotal that has the following expression: =IIf([NotEligible]=False,50,0)+(Nz([SumOfPointAmt])*2). I have tried adding a text box in the footer with the expression =Sum([txtGCTotal]) but it...
Top Bottom