Ms Access Convert DB Date Queries, Reports, Statistics

https://www.freelancer.com/projects/Excel/Advanced-Access-Database-Finish-half-9825288/#/details I'm looking for a freelance that can take my current Placements database can either convert it or make a new one. The New Database will have different names to match with the query is being filter for what it’s pulling like "FirstMondayThisWeek_qry" For this project I can offer $35, Will pay for each new report created after first project is complete. Please let me know if you are also able to make these reports into Crystal Reporting Designer Going through the queries I noticed some of them are no longer working. So noting date functions will be needed examples • Monday o Date()-((((Weekday(Date()+2))+3))) • Tuesday o Date()-((Weekday(Date(),2))+5) • Wednesday  Date()-(Weekday(Date(),2)+4) • Thursday o Date()-(Weekday(Date()+2)+0))) • Friday o Date()-(Weekday(Date()+2)+6) • Month to Date o Format(Date(),"yyyymm") I need someone that update/Create 1. Queries – Run Correctly 2. Reports – Run Correctly Instead of using this fields for client data 1. ClientNumber 2. ClientName 3. DateOfReferral 4. NumberAcctsPlaced 5. AmountReferred We need to use this fields for Rep data 1. ClientName 2. ClientNumber 3. CollectorNumber 4. CollectorName 5. DateofPayment/Count 6. DateofPayment/Sum Along with these fields to add to new reports 7. StatusCode 8. FirstName 9. LastName 10. DateofPayment 11. PrincipalBalanceTrac 12. PaymentAmount 13. DateofLastPay 14. LastLetterSent 15. NextActivityDate 16. PrincipalBalance 17. FollowUpDate 18. DebtorTotalDue If you can do this project and would like to be awarded. Please review Instructions again and then request Password to database. Once Project is complete consider helping with new reports and adding statistics this this database STATS • BASIC CHARTING • MEAN • LEARNING POINT • MEDIAN AND MODE • MIN & MAX • TREND • STANDARD DEVIATION • NORMAL DISTRIBUTION • HISTOGRAM • BOX-PLOTS • AVERAGE • VARIANCE • IGNORE Function ConvertToNumberArray(Src1 As Variant) As Variant S1 = SetArray(Src1) Dim R1 ub1 = Ubound(S1) dt1 = Datatype(S1(0)) If dt1 < V_STRING Then R1 = S1 Else Redim R1(ub1) For i = Lbound(S1) To ub1 R1(i) = Cdbl(S1(i)) Next End If ConvertToNumberArray = R1 End Function Function Max(Src1 As Variant) As Variant S1 = ConvertToNumberArray(Src1) max = - 10 ^ 60 Forall numv In S1 If numv > max Then max = numv End If End Forall Max = max End Function Function Min(Src1 As Variant) As Variant S1 = ConvertToNumberArray(Src1) min = 10 ^ 60 Forall numv In S1 If numv < min Then min = numv End If End Forall Min = min End Function Function Average(Src1 As Variant) As Variant S1 = ConvertToNumberArray(Src1) Forall numv In S1 sum = sum + numv End Forall Average = Round((sum / Ubound(S1)), 2) End Function Function StdDeviation(Src1 As Variant) As Variant S1 = ConvertToNumberArray(Src1) elem = Ubound(S1) Forall numv In S1 sum = sum + numv End Forall mean = Round((sum / elem), 2) Forall numv In S1 sumSquared = sumSquared + ((numv - mean) ^ 2) End Forall StdDeviation = Round(Cdbl(Sqr(sumSquared / ( elem - 1))), 2) End Function