Recent content by Seph

To give an update for anyone whom in future would like to implement this. I ended up creating a Temp table and with the help of VBA, populated it with data from both the InvoiceT and PaymentsT tables. Private Sub Command0_Click() SQLstatement = "DELETE FROM TmpStatementOfAccountsT"...

I agree and have decided to implement it as such. The trick now is to get them in a query format as attached above:unsure:

Hello there everyone, Looking for a nudge in the right direction please. I already have a StatementR report that reflects Invoices details (InvoiceNumber, InvoiceAmount, AmountDue etc.) The AmountPaid field on the report is calculated in the StatementRQ query: Amount Paid...

Thank you for taking the time and effort to respond🙏

Hi there, Thanks for you're feedback. I'll break the replies down in stages: Without knowing what the financial calculation / report you are having difficulty with it is not really possible to advise. The InvoiceT table stores the Invoice's final amount. I created SalesQ queries to calculate...

Good day good people of the internet. I have a database that I use to keep track of jobs, invoices and quotes. I also have to keep track of travel, stock and labour data linked to each of the above. Below is my current database format: When a record in the JobsT table has a corresponding...

Hi everyone, I'm attempting to use the following VBA code to print a record on a form: Me![Paid] = True Me.Refresh DoCmd.OpenReport IIf(SalesInvoice, "InvoiceSalesR", "InvoiceJobR"), acViewPreview, , "InvoiceID=" & InvoiceID The form InvoiceActiveList that the record is on uses a query...

Good day everyone, I was searching around the forum and couldn't find a solution to this. I use the Report Footer to show final totals and payment advice, so in my case it needs to be the end of the report. I know the Report Footer follows the Detail portion of the Report. So sometimes the...

Thanks very much for everyone's input. The below code was the solution I implemented: Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer) Me.PageNumber.Visible = (Me.Pages >= 2) End Sub Thank you @The_Doc_Man for the Me.Pages solution.

Margins are right. If I remove the Page Footer Format event then it works fine. Just looks silly with 1 page saying "Page 1 of 1" My apologies. I will do so.

I like your simple idea. Thank you. However it's still misbehaving. I added an unbound field =Page just to ensure that I'm not making a mistake. The results are still the same

Perhaps I'm ending it off wrong🤔

Is it possible to have page numbers on all pages if the page amount exceeded 1. So if a single page, then no page number. But if more than 1 then page, then page numbers will appear on every page, including the first. Me.PageNumber.Visible = (Me.Page >= 2 This works well, but only pages after...

Your knowledge of Access is truly impressive. I can't thank you or the Forum enough.

Ok, last question and then I won't ask another stupid question for a month:ROFLMAO: Your code works perfectly. (Thank you) I change the text field's format to get the desired result: Is it possible to wrap the code in a format like it is in the Report Properties section so that the print...