Recent content by DHookom

Apparently, another opinion was needed to reinforce the consensus here.

Every time you modify your code, you need to compile it to check for errors. This assumes you use Option Explicit at the top of every module.

Did you attempt to compile your code?

There is no date column, only a WeekNo. Did you want to use the WeekNo as the column heading? If WeekNo is the column heading, which columns create your Row Headings and which one column/field do you want to use the value? Can you create and share an Excel that mimics your desired result?

JohnPapa’s profile suggests Cyprus. Sadly, I had to google map it 🙁

Wow! A link to Ken Snell’s great Excel code. He’s been gone for over 4 years yet still is contributing ❤️.

With the code I suggested with the code in the link, it’s very easy to reset the SQL to the original. You can also build a fairly sophisticated where clause, apply it, and call it from any form. Using a control on a form limits you to having that form open and setting the correct value.

I would look into antivirus software. Try disabling to see if performance improves.

I realize this was your version and expect the OP would understand (and possibly post text SQL versus an image). I wanted something to simply copy and paste.

Based on your location, should you use ";" in place of ","? DateAdd("m";[factor];[dailydate]) AS Expr1

Tell us exactly what you want to see in the subform and how you expect to add a new record? Did you consider changing the properties of the subform to Add mode?

Is there a reason you don't simply enter the new check at the New Record on the subform?

A method that has always worked for me is to change something in the record source of the report to limit the records returned. For instance if you have an employee table [tblEmployees] and want to limit the report to a specific EmpID, create a query [qselEmployees] with the SQL of SELECT * FROM...

Also, I have had issues in the past with larger image files not rendering. Do you know the size of the files and have you tried with smaller files? I would also add a line in your code to help troubleshoot: Debug.Print CurrentProject.Path & “\img\” & Me.txtPathImage

I found your images confusing. It seems that your field in question is a lookup field and behaving like lookup fields behave. You would almost always want to use and store the ID value, not the text. The text value is stored only in one table based on sound relational database theory.