Recent content by debbiedoobie10

  1. D

    When compiling the code I get the error Next without for.

    I need fresh eyes. When compiling the code I get the error Next without For. Here is the Code. Function RevisedTEST_CALCFEES() Dim MyDb As Database Dim mytable As Recordset Dim MYDYNA As Recordset Dim TOTAL As Long Dim FM As Form Dim Ra1 As Variant Dim Rb1 As Variant Dim Rc1 As...
  2. D

    Access emails without outlook

    Has anyone inserted a jpeg into the body of the email
  3. D

    Access emails without outlook

    Hi Isladogs Do you have a sample of the code you used for the body of the email with image?
  4. D

    Access emails without outlook

    I'm new to VBA code and do not have any experience with HTML. I have a project to send Christmas emails from access without using outlook. The problem I'm having is the body of the email which contains text, picture and background. Here is some of the code. The body of the email was a word...
  5. D

    Query calculation

    I need some help with calculations. I have a table field one is $257,481.48 (double, standard, 2) and field two is .000429 (single, standard, 6). When I use a query to calculate $257,481.48 multiplied by .000429 the result is 110.50. The correct amount is 110.46. Do you have any suggestions...
  6. D

    Run Time error: 3020 when I move off the record

    I am new to code and I took this project over for someone that left. Thank you for all your help.
  7. D

    Run Time error: 3020 when I move off the record

    Thank you for all the help I have multiple forms with a Call button and the On Click Event runs a macro which runs code NewNote() I have a Notes field that adds the code “01/31/18 2:58p DLB> “ and the cursor is place at the end of the data for input of the rest of the notes. The entry person...
  8. D

    Run Time error: 3020 when I move off the record

    I get an 'Update or CancelUpdate without AddNew or Edit' error when running the following code. When I move off the record. Does anyone have a suggestions Function NewNote() Dim NEWNOTES As String With CodeContextObject .[ContBy] = DLookup("[AGENT CODE]", "SALES AGENTS"...
  9. D

    VBA code works most of the time

    CodeTPCash() Function CodeTPCash() Dim intDayCtr As Integer Dim rstbltp64g As DAO.Recordset Dim rstbltp66g As DAO.Recordset Set MyDB = CurrentDb Set rstbltp64g = MyDB.OpenRecordset("tblTP64G", dbOpenForwardOnly) Set rstbltp66g = MyDB.OpenRecordset("tblTP66G", dbOpenForwardOnly)...
  10. D

    Access VBA code works sometimes after 2016 conversion

    The code below was created in access 2013. I am in the process of upgrading to access 2016 and this code works sometimes. My process to find that this is the code that is not working is to step into the code and stop when the data is incorrect. Remove the data that is incorrect and step into the...
  11. D

    VBA code works most of the time

    When I run the code below in Access 2013 it works. When I run the code below in Access 2016 it works sometimes. When I step into the code and stop the code when the data is wrong. I went into the table and removed the wrong data then went back to the step into code and continue it works. Most of...
  12. D

    Email BCC and pdf attachment

    Paul, Do you know the code to attach the pdf to the email and in the body of the email. I need to put the from address in also.
  13. D

    Email BCC and pdf attachment

    I have a table named tblEmailCell that has a field named EmailAddress ( this is the email address I want to use). I have a query named qryMyEmailAddresses that pick 25 email address from tblEmailCell. Could someone help me write VBA to send a email with the EmailAddress in the bcc, the subject...
Top Bottom