Read our blogs, tips and tutorials
Try our exercises or test your skills
Watch our tutorial videos
Take a self-paced course
Read our recent newsletters
License our courseware
Book expert consultancy
Buy our publications
Get help in using our site
395 attributed reviews in the last 3 years
Refreshingly small course sizes
Outstandingly good courseware
Whizzy online classrooms
Wise Owl trainers only (no freelancers)
Almost no cancellations
We have genuine integrity
We invoice after training
Review 30+ years of Wise Owl
View our top 100 clients
Search our website
We also send out useful tips in a monthly email newsletter ...
| Software ==> | Access VBA Macros (25 exercises) |
| Topic ==> | Recordsets (3 exercises) |
| Level ==> | Average difficulty |
| Subject ==> | Access training |
This exercise is provided to allow potential course delegates to choose the correct Wise Owl Microsoft training course, and may not be reproduced in whole or in part in any format without the prior written consent of Wise Owl.
Have a look at the tblProduct table - it contains a list of possible gifts (and has nothing to do with any of the other tables in this database!):

Something for everyone here ...
Create a new module called modProducts, and in this a procedure calledAddToyWithGivenName which asks the user for the name of a new toy:

Use the InputBox function, and store the toy chosen in a variable
Extend your macro so that it stores the name of this new toy as a new record in the tblProduct table, using the AddNew method.
If you have time, modify your macro so that if you type in a toy whose name already exists, you get a warning message and the duplicate toy name is not added:

You need to loop over all the records in the table, checking for each that its name isn't the same as the toy you've just entered
If you get all of this working, close your form and module and breathe a deep sigh of satisfaction!
Kingsmoor House
Railway Street
GLOSSOP
SK13 2AA
Landmark Offices
99 Bishopsgate
LONDON
EC2M 3XD
Holiday Inn
25 Aytoun Street
MANCHESTER
M1 3AE
© Wise Owl Business Solutions Ltd 2026. All Rights Reserved.