I Need to Speed Up My Computer: Append 2 tables

Append 2 tables

I'm trying to convert Excel data over to Access.
I have a query like:
SELECT HomesT.Shoveler
FROM HomesT
GROUP BY HomesT.Shoveler
HAVING (((HomesT.Shoveler) Is Not Null));
This generates a list of employees now I need to append these name to tbl_Employees, so I came up with the following

INSERT INTO tbl_Employees ( FirstName )
SELECT HomesT.Shoveler
FROM HomesT
GROUP BY HomesT.Shoveler
HAVING (((HomesT.Shoveler) Is Not Null));
But I need to also append related information for each of these entries in another table. Each of these employees needs to also have the proper responsibility code associated against their EmpId which is the PK of the tbl_Employees.

tbl_Employees_Responsibilities:
EmpRespId -> PK, AutoNumber
EmpId -> Generated when the insert occurs per the query above so I need to be able to pass this along dynamically
RespId -> is a number, for this specific case, it would be 2

So let's say in my 1st query I append John to the tbl_employees and he get assigned EmpId 394, then I at the same time need to create an entry in the tbl_Employees_Responsibilities for EmpId 394 assigning RespId 2.
How does one do this?
QuestionBoy

Anwsers to the Problem Append 2 tables

Download Error Fixer (Free)

After you run the append query, try running:
INSERT INTO tbl_Employees_Responsibilities (EmpID, RespID)
SELECT DISTINCT tbl_Employees.EmpID, 2 As RespID
FROM HomesT INNER JOIN tbl_Employees
ON HomesT.Shoveler = tbl_Employees.FirstName

Note: You should only use HAVING when you have a criteria applied to an aggregate expression. When you use the Totals option in the query designer, for each field with criteria, set the Totals cell for the field to Where whenever the field is not a calculated
field with an aggregate function in its expression. You can see how this works by switching your original query to SQL view, changing the word HAVING to WHERE and switching back to design view.

To check for Windows updates

Open Windows Update by clicking the Start button Picture of the Start button, clicking All Programs, and then clicking Windows Update.
In the left pane, click Check for updates, and then wait while Windows looks for the latest updates for your computer.
If any updates are found, click Install updates. Administrator permission required If you are prompted for an administrator password or confirmation, type the password or provide confirmation.