Search results

I have a form created called "View_Orders" it has a subform called "Order", I have added a button to open a new form but its not working getting error saying it cant find "ORDER_ACCOUNT_NO" referred to in your expressions. guessing its because the field is within the sub form DoCmd.OpenForm...

No need to create a new post as its related to my code that removes the password and its not excel i am looking at its access, :)

So i am now wanting to to this code the option to remove any filters that may be present - any thoughts

Using #2 works well thanks :)

Thanks this does work if the customer doesnt have more than 1 entry if they just have 1 entry it throughs up error

Look for some help i need to have a query to delete the oldest record within the table by customer_ID I have Customer_ID and then the field i want to use is the importing_Date So need to delete oldest record for the same customer, however not all customers will have more than 1 record?

Tried that too it doesnt work :(

Do you have any examples of the code used to do this please? as this didnt wok

the data tables are too big and i did union them, but it takes hours to run so need to change to individual queries

So i need to have a form to run different queries depending on the week number selected Please Select week No: (01-41) If then week number 01 is selected it would run query providing the data for just that week no Reports_0 (which contains weeks 01-03 data) have to split as the data is too...

Is there a way to highlight to the user that the text within a form field is greater than 20 Charters, so then they can reduce/abbreviate The form is used as a final check to provide a report, the output Table has been set to the correct size 20. but this just cuts off any charters after the 30...

Yeh fixed by using... .ActiveWorkbook.SaveAs ("C:\Reports\Zip\Sales Report Week " & Format(Date, "WW", vbMonday, vbFirstFullWeek) & " " & Format(Date, "DD-MMM-YYYY") & ".xlsx")

because UK week number is 41 Week Numbers for 2022 (epochconverter.com)

So Access is throwing out the report with the wrong week number., today 13.10.2022 is week 41 yet its showing as 42? command used for naming the file is ... .ActiveWorkbook.SaveAs ("C:\Reports\Zip\Sales Report Week " & Format(Date, "ww") & " " & Format(Date, "DD-MMM-YYYY") & ".xlsx") output is..

Thanks working now :)

Private Sub Command25_Click() Dim XL As Excel.Application Set XL = CreateObject("excel.application") Dim rst1 Dim vFile1 vFile1 = "Template_Location.xlsx" Set rst1 = CurrentDb.OpenRecordset("Data_1") rst1.MoveLast If Not (rst1.BOF And rst1.EOF) Then With XL .Visible = False...

No it didnt work same error

I have this code that creates a report combining two separate queries into an excel template with two sheets, this runs perfect, until say no records are in the first query, throughs out an error.. how to i tell it to continue onto the next pls? Dim rst1 Dim vFile1 vFile1 =...

Hello so i need to remove the "0" from telephone numbers and replace with "44" is this possible via an update query

Sorted it.. Format(CDate(Format([DateField],"dd-mm-yyyy")),"yyyymmdd"