Search results

  1. E

    Using Function

    What I need is to be able to count the number of Monday's, Wednesday's and Friday's in a Specific month. Apparently, the code that I included in my previous message does this but I'm not sure what I need to do to have the results of this function entered into a query so that I can use it in a...
  2. E

    Using Function

    Hello, I found the following code that I want to use in my database but I'm not sure how I can test it and implement it if it returns what I'm looking for. Public Function countday(dt_from, dt_to) 'this function return an array of 7 integer (1 to 7) counting the number of monday, tuesday...
  3. E

    Problem with IIF Statement

    Hi Brian, Thanks for the additional information. You're correct that, Val([Field43])>=31 should be Val([Field43])+7>=31. I also implemented your revised code and it works great. I really appreciate your assistance. Take care. Regards, Chris
  4. E

    Problem with IIF Statement

    Thanks to both Paul and Brian. I modified your suggestions and it works great. Here is the final statement. =IIf(IsNull(Forms![Attendance Form]!ThirdDate) And Val([Field43])>=31,Val([Field43])+7, IIf(Val([Field43])+7>=31,Null,Val([Field42])+7)) Feel free to recommend any additional changes...
  5. E

    Problem with IIF Statement

    Hi Paul, I have 3 criteria that I need to include in the statement. This is what I currently have. IIF(IsNull(Forms![Attendance Form]!ThirdDate), Val([Field43])+7,IIF(Val([Field43])+7>=32,Null, IIF(Forms![Attendance Form]!ThirdDate)>0,Val([Field42])+7) I'm still getting the error of having...
  6. E

    Problem with IIF Statement

    I believe my first attempt wasn't correct so I changed it to the following. =IIF(IsNull(Forms![Attendance Form]!ThirdDate, Val([Field43])+7),IIF(Val([Field43])+7>=32,Null), IIF(Forms![Attendance Form]!ThirdDate)>0,Val([Field42])+7)) Unfortunately, this still gave me the same error. I then...
  7. E

    Problem with IIF Statement

    Thanks Paul, I tried changing the statement to the following. =IIF(IsNull(Forms![Attendance Form]!ThirdDate), Val([Field43])+7,IIF(Val([Field43])+7>=32),Null,Val([Field42])+7) Unfortunately I get the following error. The expression you entered has a function containing the wrong number of...
  8. E

    Problem with IIF Statement

    Hello, I'm running Access 2003 and I'm having problems with an IIF statement that I have in one of my reports. Here is what I have so far. =IIf((IsNull([Forms]![Attendance Form]![ThirdDate]) Or (Val([Field43])+7>=32),Null,Val([Field42])+7) This statement works but not in the way that I need...
  9. E

    Attendance Report

    Not a problem Banana as I'm not in a big rush for this. Thank you. Chris
  10. E

    Attendance Report

    Thanks Banana. Unfortunately I'm not sure where to begin. I looked at the Weekday function but I'm not able to figure out the best approach that I should take. Would you or anyone else have a pointer to something similar? Thanks, Chris
  11. E

    Attendance Report

    Hi Banana, You're correct. My database has no knowledge of the attendance. Currently the column headings that have a number in them are unbound textboxes and I want to be able to programmatically fill these with the dates of the days of the week that I noted for a specific month. I've spent a...
  12. E

    Attendance Report

    Hi Banana, You're partially correct in that I have a table with all of the student's names but I don't have a table of dates that we meet. Every month we meet on Monday's, Wednesday's and Friday's. I print off the report each month and I take it to class where I manually place a check mark...
  13. E

    Attendance Report

    Thanks for the reply but I don't know if that would give me what I need. I have the report designed and now I want to fill the column headings with all of the dates of the Monday's, Wednesday's and Friday's for a given month. If the crosstab query is the correct approach could you provide me a...
  14. E

    Attendance Report

    Hello, I am running Access 2003 and I need some assistance with an Attendance Report for a Student database. I only run classes every Monday, Wednesday and Friday of each month. I want to be able to open the report and have all of the dates for those days of a specific month be inserted into...
  15. E

    Need to apply 4 conditional formatting rules.

    Hello, I have a workbook with multiple worksheets and I need to apply 4 conditional formats to cells, that contain a date, in column E, based on the following criteria. If the current date in column E: Is between 28 and 35 days from Today() Is between 21 and 28 days from Today() Is between...
  16. E

    Unable to format DATE function

    Thanks for the reply Brian. I suspected that this wasn't possible but I thought I would ask. Having both date and text one font color isn't the end of my world so I will just leave it as is. Take care, Chris
  17. E

    ListBox From Macro

    Problem Solved!!! I realized that I'm making this far too difficult as I already have the listbox created for Range("G7"). I thought a more practical approach was to have the user filter the data using the listbox and then run a macro that will copy the filtered data to another workbook. To...
  18. E

    ListBox From Macro

    I had another idea that someone maybe able to assist me with. I already have a listbox created in column G7. When I make a selection it filters it appropriately. What I would like to do is when a user makes a selection a macro would run that would prompt them if they want to just display the...
  19. E

    Unable to format DATE function

    Text Formatting Hello, I was wondering if anyone knows if I can apply a different format to the date and the word UPDATE! in the following formula. =TEXT(TODAY(),"d-mmm-yy")& CHAR(10) & CHAR(10) & "UPDATE!" What I want is for the date to be dark blue and UPDATE! to be bolded and in a red...
  20. E

    ListBox From Macro

    Hello, I recorded the following macro that filters the active worksheet copies the visible data only and pastes this into a new workbook. Range("G7").Select Selection.AutoFilter Field:=1, Criteria1:="SWD Nearline" Cells.Select Selection.SpecialCells(xlCellTypeVisible).Select...
Back
Top Bottom