Recent content by MattBaldry

Image below for the finished solution. Thank you all for your help.

Thanks David, This worked, but there was a single ) missing after the & delim) = 0 I shall use this now and see if it is to the liking of the people here who make these demands. Thank you for your help. ~Matt

Hi Gasman, In this example they are, but not always. I have used the second for testing purposes here though as there are 3 different values in the list. The finished setup will use unique information from the first 3 columns in the report, but if I can get the test data working on any column...

Hi Maj, It almost works. The first selection only has the unique value, but anything thereafter lists them all. 3 of each selected, displays unique first order, 3 duplicates thereafter. 1 and 3 selected, same result as above.

Thanks Maj, I did try the instr, but it always duplicated the first selection. I shall give your code a try when I get to work. ~Matt

Hi Mark, On this occasion I cannot make this column distinct as the main column has different values. Please see below for some sample data. The information I need to pass to our customer is their order number and their part numbers. The Works Order numbers are for our own internal...

Hi Forum Minds, I have found the below code on here which works almost perfectly. Display Selection of a List Box in a Text Box Dim strSelected As String Dim varItem As Variant With Me.lstLiveWorksOrderList For Each varItem In .ItemsSelected strSelected =...

It works and looks nice enough, so I shall leave it as it is for now. ~Matt

Hi Colin, Sorry to be a pain, but do you know if there is a way of displaying the data table on the modern charts? I have had a look on your in depth page and couldn't see anything. At the moment I have done it as a subform to give the effect of being the datatable, but was wondering if it was...

Thanks Ken, This works the same as the code ChatGPT offered, but with the data we have is taking 3 times as long to open. Most of the people using this are logging in remotely and have the patience of Dr Shipman when waiting for anything to load. Sage already slows everything down massively...

Never trust AI :) I'll remove it to clean it up on my database, but leave it there on the example as it is working anyway. ~Matt

This section? runningSum = 0 currentFY = "" currentMonth = ""

Please see below for working code. This was done for me by a colleague using ChatGPT. It updates a field in a table, rather than as a query, but it does work perfectly. Sub CumulativeRunningTotalByMonthFY() Dim db As DAO.Database Dim rs As DAO.Recordset Dim...

I now have this working, kind of. I shall post the solution here later. ~Matt

I have a full working and adapted version of Aleksanders work. I have also emailed him several times with issues I have had with some of the code and he has helped me for free. Some of his code is in Polish and some in English. He has helped me change it for free where I have been stuck. If the...