Hi again,
In the SELECT section, you have to repeat the table name for each value, so:
strSql = "INSERT INTO [Dispensing 2] ( [Drug name], [File ID],[Quantity],[Expiry Date], [Batch Number],[Replaced Quantity],[Availability], [User1] ) " & _
"SELECT [Dispensing 2].[Drug name], " & lngID & " AS...