The "x ='" & dMonth & "' And y ='" & dYear & "'" worked like a charm.
The x and y in the report extract the number of the month and the year from a date field as well.
Thanks as always for your help
I'm having trouble getting my filter to work.
I'm trying to get a report to filter the month and year from a date. I have fields for the month and the year on the report, x and y.
I'm extracting the month and year from the date field in the form.
I get a syntax erro on the code, and think...
I want to set an unbound control on a subform based on a value in an unbound combo box on the mainform.
The mainform, frmRecallPayQuantities, has a combobox cmbMonth.
The subform, frmDailyReportQuantitiesSummary, has an unbound textbox in the forms footer called txtMonth.
I'm trying to use...
Made a work around.
Used a Docmd.OpenQuery.
Wish I thought of this before.
Not as elegant, but works like a charm.
Thanks for sticking with me on this.
SerialNumber is the only number. The others are text.
Here's the Debug.Print strSQL after I made changes suggested by isladogs:
INSERT INTO tblSubmittalSuplementalReviewer ( Reviewer, SerialNumber, ContractorNumber )SELECT tblSubmittalReviewList.Reviewer, tblSubmittalInfo.SerialNumber...
Good questions.
tblSubmittalReviewList contains a listing of "Default" reviewers for specific types of Submittals for a construction project.
For example, all of the architecture submittals would go to the Architect and the owner.
I want the user to pick the type of submittal from a combo...
I'm been struggling with this SQL statement for several days.
I want to insert values from 2 tables into another.
I get a missing operator error on the WHERE statement
Private Sub cmdInsertDefaultReviewers_Click()
Dim strSQL, strCN As String 'SQL statement.
Dim lngID As Long...
Got it to work. Thanks isladogs.
Needed to add a reference to Microsoft Office 16.0 Object Library.
Also, why do you have "F.show" two times in your code? I removed the first instance.
I can figure out how to apply msoFileDialogFolderPicker in the code.
Here is the complete code I am using. This is part of a code to add a hyperlink to a text box on a form.
Public Function GetOpenFileNameGs( _
objForm As Form, _...
I have code to add hyperlinks for files to a text field on a form.
The code has worked for years, but suddenly stopped working on one users computer.
The code uses
GetOpenFileName(OpenFile)
to open a directory to get the link to the document.
The machine in question is running Windows...