Recent content by ppataki

  1. P

    NZ function and linking to Excel

    Hello! As far as I remember the only solution is not to use the NZ function but to use eg. IIF or SWITCH functions instead Or if it is about converting text to numbers use CINT or CDBL functions Cheers
  2. P

    Me.Filter another date issue

    OK, got it Now I have put the combo box on the subform and it works that way! (it just would have been nicer to have it on the main form, but anyway) Many thanks!!
  3. P

    Me.Filter another date issue

    Now I get error: Enter parameter value Akt_datum
  4. P

    Me.Filter another date issue

    Dear All, I have a form where I used the below filter in the AfterUpdate event of me.celev_combo: Me.Filter = "Year([tbl_aktivitas].[Akt_datum]) = " & Me.celev_combo Me.FilterOn = True and I got the following error: Enter parameter value tbl_aktivitas.Akt_datum (me.celev_combo is a numeric...
  5. P

    Me.Filter with dates

    Point taken, it works now!! Many thanks for your help, really appreciate it
  6. P

    Me.Filter with dates

    Hello, Yes it exists (PFA screenshot)
  7. P

    Me.Filter with dates

    Dear All, I have a form where I have a text box where I can enter dates (me.aktkezdet_combo) After entering a date I have put the below code in the AfterUpdate event of the text box: Me.Filter = "aktkezdete >= " & Format(Me.aktkezdet_combo, "\#mm\/dd\/yyyy\#") Me.FilterOn = True (aktkezdete...
  8. P

    AllowEdits does not work

    I tried and it works unfortunately This is a subform - does it matter? Cheers
  9. P

    AllowEdits does not work

    Dear All, I have a form where I turned off the AllowEdits property (Data, AllowEdits=No) Despite this I can still edit existing records in the form...very strange Could you please advise? Many thanks in advance
  10. P

    Sending multiple emails

    Unfortunately nothing happens if I run the code (I have sorted the query by UserID)
  11. P

    Sending multiple emails

    OK, I got a bit forward I have replaced the whole code, the new looks like this Dim dbs As DAO.Database Dim strsql As String Dim rs As DAO.Recordset Set dbs = CurrentDb strsql = "qry_emailing_id" Set rs = CurrentDb.OpenRecordset(strsql) Do While Not rs.EOF...
  12. P

    Sending multiple emails

    If MsgBox("Biztos vagy benne?/Are you sure?", vbYesNo + vbQuestion) = vbYes Then Dim olapp As Object Dim olns As Object Dim olfolder As Object Dim olitem As Object Dim olattach As Object Dim rstRecip As Recordset Set rstRecip =...
  13. P

    Sending multiple emails

    Somehow that would need to be automated as this is a dynamic recordset that may contain dozens of records of multiple names I think somehow the outer loop should be grouped but I have no idea how
  14. P

    Sending multiple emails

    "qry_emailing" contains the following recordset: qry_emailing UserID Username HolidayDate Status StatusMan ManActionDate bekesikr Bekesi Krisztina 2011.05.20. Szabadság/Holiday Elbírálás alatt/Pending approval 2011.05.24. bekesikr Bekesi Krisztina 2011.05.13. Szabadság/Holiday...
  15. P

    Sending multiple emails

    Thank you for the reply but could you please be more specific, this is a bit out of my league :)
Top Bottom