Recent content by Number11

  1. N

    Solved Help this is not working - Dlookup

    this was correct and worked If DCount("[Account No]", "Master", "[Account No] =" & Me!AccountNo)>0 Then many thanks
  2. N

    Solved Help this is not working - Dlookup

    Thanks working now :)
  3. N

    Solved Help this is not working - Dlookup

    in the table it is Account No and on the form the field name is AccountNo
  4. N

    Solved Help this is not working - Dlookup

    Thanks but this is not working at all still, even if i try and eneter with say account number 999 it promps me but nothing in the table with that account number?
  5. N

    Solved Help this is not working - Dlookup

    No its a number field?
  6. N

    Solved Help this is not working - Dlookup

    same didnt work If not IsNull(DLookup("[Account No]", "Master", "[AccountNo] ='" & Me!AccountNo & "'")) Then
  7. N

    Solved Help this is not working - Dlookup

    I am trying to get this to work, so the form has this and i want it to promp message if the customer is already on the database, but this isnt working it prompts even if they are not :( Private Sub AccountNo_BeforeUpdate(Cancel As Integer) Dim dr As VbMsgBoxResult If (Not...
  8. N

    Query date

    So i have the query linked by the "Customer Ref Number" with criteria "is not null" - this bring me a list of all appointment requested not booked and not completed, but if an appointment completed was before the new requested appointment, this query currently does not show the new appointment...
  9. N

    Query date

    brings no results at all :(
  10. N

    Query date

    "Customer Ref Number"
  11. N

    Query date

    Hi, So I currently have a query that looks at a table with appointment requests against a another table Appointment Booked and then another Table Appointments completed. What I need to do is only show appointment requests if the Appointment Booked and Appointment completed dates are greater...
  12. N

    Sending an email with attached report - dont sent if nothing attached?

    Oh ok sounds good how would i go about setting this up
  13. N

    Sending an email with attached report - dont sent if nothing attached?

    Ok so sometimes it falls over afte this point... .Attachments.Add "File name and locatin here" & Format(Now(), "DD-MMM-YYYY hhmm ") & ".xlsx" email is send without attachment so yes you are correct the If rst.RecordCount = 0 Then does stop if not records found, but the issue is that for...
  14. N

    Sending an email with attached report - dont sent if nothing attached?

    Hi Thanks for your reply, so just want to stop sending email without the file attached?
  15. N

    Sending an email with attached report - dont sent if nothing attached?

    Hi, so i have this code which is run from a button i need to stop the email from sending if no attachment has been made.. Dim rst Dim XL As Excel.Application Set XL = CreateObject("excel.application") Dim vFile vFile = "Template File Location Here" Set rst = CurrentDb.OpenRecordset("All") If...
Top Bottom