Hi Mstef thanks for the response. It seems to do the job by incrementing the right field but every time I do it it doubles the number of records it adds ie first run = 2 records added, then 4 , then 8
My Field contents are:Serial: Nz(DMax("[ProductTbl]![StartNo]","producttbl"),0)+1