Search results

Thank you. I will give that a try over the weekend.

Ideally I wanted the option not to run the query. All I want is to stop the first "you are about to run an append query" message box and keep the second message box. I think I am going to do as Gasman suggests and create my own message box with a record count but i will attempt that when I have...

Correction, my statement above "If I run the query direct from the query I only get the second box" was incorrect. The query has to already be in design mode for you to only get one message box.

If I turn warnings off I lose both message boxes and I think the "you are about to append..." message box is useful. I don't know how to / where to turn off just the first "you are about to run..." message box.

I have a button on a form which runs an append query. The button code is: Private Sub cbUpdateRecords_Click() On Error GoTo cbUpdateRecords_Click_Err DoCmd.OpenQuery "qryFertApplnGroup", acViewNormal, acEdit cbUpdateRecords_Click_Exit: Exit Sub cbUpdateRecords_Click_Err: MsgBox Error$ Resume...

Just to finish off this thread I resolved this by adding a "select for printing" Yes/No button into the detail of the subform and then used that in the query behind the report.

tblSLTrptFertApplnCharts has a single field FertApplnIndex

The error is too few parameters. INSERT INTO tblSLTrptFertApplnCharts ( FertApplnIndex ) SELECT qryUpdateFertApplns.ApplicationIndex FROM qryUpdateFertApplns WHERE (([Lookup_ProductName].[ProductName] Like "*olysulpha*")) AND ([qryUpdateFertApplns].[Variety] Like "*ham Win*")

There was nothing in the Immediate window and I couldn't understand why. Then I noticed there was a typing error in the Debug.Print command. Here is the text INSERT INTO tblSLTrptFertApplnCharts ( FertApplnIndex ) SELECT qryUpdateFertApplns.ApplicationIndex FROM qryUpdateFertApplns WHERE

How do I find Me.Filter value? Would it be in the Property sheet? If so here are a couple of examples. (([Lookup_ProductName].[ProductName] Like "*N. 34.5*")) AND ([Lookup_ApplicationTiming].[ApplicationTiming] Like "*umn seed*") ([qryUpdateFertApplns].[FieldName] Like "*unt Plea*")

Does the "receiving table" tblSLTrptFertApplnCharts have to have identical field names to the "sending query" qryUpdateFertApplns?

Using your code: Dim strSql As String strSql = "INSERT INTO tblSLTrptFertApplnCharts ( FertApplnIndex ) SELECT qryUpdateFertApplns.ApplicationIndex FROM qryUpdateFertApplns " strSql = strSql & " WHERE " & Me.Filter Debug.Print strql 'if that does not work go into immediate window and post...

Hi MajP, how would I do that please? This is my append query INSERT INTO tblSLTrptFertApplnCharts ( FertApplnIndex ) SELECT qryUpdateFertApplns.ApplicationIndex FROM qryUpdateFertApplns;

Good morning, I have a main form with a subform. The subform is a continuous form which is filtered from the main form. I then use the inbuilt Access Filters (right click in the text box) to narrow down the records shown in the subform. Once the records are filtered down I would like to copy...

On this particular form there is already data in the combobox. If all of the text is not selected and I type "br" for example then the br just gets inserted into the combobox with the existing text. If all text is selected then typing "br" triggers FAYT.

I have a continuous form with a combo box where the row source is a query. I have added the following code so that when I click in the combobox the all of the text is selected so that I can use MajP's FAYT. Private Sub cbVarietyID_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As...

Hi MB, is it possible to change how you are connecting to the office? I have recently moved my Access DB to a remote server which I now connect to via Remote Desktop and the performance is only slightly slower than when the database was in my office. The Front End and Back End are both on the...

Thank you Minty, Auto Center was set to no but deleting DoCmd.Maximize from the form open sorted it.

I will be using a smaller monitor for a while and have one large form which I need to open so that the top left of the form is in view. Currently it opens top centre. I have tried Me.Move 0, 0 and DoCmd.MoveSize 0, 0 in the form load and open but they don't make any difference. I am not using...

So I opened the folder and it was empty, then I went to a back up copy of my database opened the report and the folder stayed empty. I then opened the report in design mode and opened the unbound object and four files appeared. Closed the report and the files disappeared. So it looks like on my...