Search results

Can you please show us the entire procedure where you open the report? As mentioned you need to put together the two Where clauses; or you could change the record source for the report to incorporate the selection in the option group optSales assuming that is the form that launches the report...

The date variables need to be enclosed in #: Private Sub btnSearch_Click() Dim strDate As String strDate = "SELECT DocumentNumber, TranDate, TranType, EntityName FROM tblEntities RIGHT JOIN (tblTranTypes INNER JOIN tblTransactions ON tblTranTypes.TranTypePK = tblTransactions.TranTypeFK) ON...

Could it be that you have some sticky keys turned on? https://www.makeuseof.com/windows-11-sticky-keys-on-off/#:~:text=Open%20Quick%20Settings%20by%20pressing,Keys%20from%20the%20Accessibility%20menu. Cheers,

@gojets1721: Is this a continuous or datasheet form? If you simply want to requery the list for combo 2 (meaning the available subcategories for the selected category in combo 1) the best place to do that is the Enter or GotFocus events of combo 2 itself. So when you enter the combo it requeries...

Cross-post? https://www.accessforums.net/showthread.php?t=87302 Cheers,

Solution given on the original post. Cheers,

Of course you do because you "unload" the subform; you need to store those values in variables: Dim strSQL As String Dim strSource As String Dim lCatOrder as Long Dim sChecklist as string Dim sCategory as string lCatOrder=Forms!frmBackground!subfrmChecklists!txtCatOrder...

Not sure what you mean Mike, how could it repeat the last # if it is bound to a fields holding a sequence (built by your append query in step # 3 in post #5)? Cheers,

Does #4 already happen or is that your question, how to make it increment? If already happening I don't understand your original question; if it doesn't then my answer in post # 2 applies. To the append query that runs in point # 3 add a calculated field...

Then you either need to add it or use a ranking query to get your numbering; if the control is unbound it will display the same value for all the records in a continuous form. EDIT: is the continuous form based on the import table or the target table - the target should be the one where the...

If the LoadNumber control is bound to the LoadNumber field in Loads you don't need it; you do that in your append query (add a calculated field with that expression to load it into the empty LoadNumber field for the new record). If the control is unbound in a continuous form it will be the same...

The code as shown in the original post does NOT requery the subform itself other than the txtDate2 AfterUpdate; the intent of the GotFocus is to requery the combo box itself. The problem is with the employee combo on the subform which has nothing to do with what you mention. Cheers,

You should remove the requery of the combo in the Click event but you can leave it in the GotFocus event. What is the bound column of the EmployeeID2 combo? Do you have a lookup field set up in the Employee table for EmployeeID? If yes that might be the cause of your problem. Cheers,

Made my day!😊

Mike, is the selection happening in a continuous form as you originally stated or in a listbox as you show now? If a listbox where are all those Values ([]) coming from? Show us a screenshot with your form please.... Cheers,

(y) Glad to hear! Good luck with your project! Cheers,

Sarah, you going to have to explain a bit more about the intended usage of this form; the default value of a control will only apply to new records, yet you seem to want to build some sort of search utility which implies loading existing records. Cheers,

Maybe something like this?

Because it is similar to the approach used in Allen's link I provided you in post #3 (but potentially slower with large record sets because you are using dCount instead of Count in a totals subquery). but you ignored it.... Anyway looks like you learned something new and maybe next time a...

I think you're missing the reference to the workbook in your code:appexcel.ActiveWorkbook.Worksheets("RECIPE") Cheers,