Ok, I have a column of comboboxes combo11, comb012, ..., combo16. These boxes are next to text11, text12, ..., text16. Thanks to Roy vidar I have a public sub which contains.
mlout = Val(Right(Screen.ActiveControl.Name, 2)) - 10
gives me 1, 2, ..., 6 which I save in a field of a record with an...