Search results

Thanks Paul, excellent result

Thank you Paul, I'll give this a shot after work

Ok, so I can't sleep. Here goes: 1. Open SearchPupilSignOutForm, the ListFrom listbox Multi Select property is already set to Extended and the code should run fine. 2. Select all items in ‘ListFrom’ from the top down with the exception of Lee Rixon. 3. Click on the...

Will do Paul, won't be until tomorrow though. Got to get some sleep :)

Apologies for the tardy response, thanks for all the feedback on what I now realise was quite limited information - I usually post after several hours of attempts and fatigue takes over. I've tested the code, run from a command button, on approximately 7 items within the listbox and I can...

Hi I'm using the following code and it works initially when a few records in a listbox (ListFrom) are selected but then I'm greeted with 'invalid use of null' when I run it a second time. The strange thing is that when I set the Multi Select property of the listbox to 'Extended', the code...

Rowsource for the ListBox (List From) is below. Employees can belong to more than one department/group hence the way the query is set up. By selecting a department from the DepartmentCmbo (ComboBox on the same form), the List Box is filtered accordingly. By including the department in the...

Hi I've got the following code (following good advice on this forum) but now realise that I need to check for duplicates in the listbox where the NameofEmployee and Department are equal (other columns in the listbox with different values so the records aren't exact matches). I need the Insert...

Taken advice on board and used following, thanks for the prompts: For Each v2 In Me.ListFrom.ItemsSelected sEmployeeName = Me.ListFrom.Column(2, v2) sDepartment = Me.ListFrom.Column(3, v2) dbs.Execute "INSERT INTO EmployeeTbl (nameofemployee,department)VALUES ('" &...

QueryDefs used as there were underlying parameters. June7's code failed to work without the QueryDefs code in place and then it dawned on me that I could use the SQL UPDATE code on a query without parameters. Works a treat!!! I'm using recordset method to update another listbox but...

Could someone please assist. Following code generates the run-time error '3421' Data Conversion Error at line: Set rst = qdf2.OpenRecordset("SELECT EmployeeName FROM EmployeeQuery WHERE EmployeeID=" & strWhere3). EmployeeID is an autonumber PK, I've also tried declaring strwhere3 as an integer...