Dear Guessed,
Thanks for your reply. Below a sample of my requirements (with thanks):
dim db as dao.database
dim rst as dao.recordset
set db = MYDB
set rst=Mydb.OpenRecordset("MYRST")
rst.index = "INDEX"
if not rst.nomatch then
rst.edit
rst.FEILD1 = "abc"
rst.FEILD2="xyz"
rst.update

All those in CAPS are the variables that change from one Sub to another

Thanks again