Crear un módulo con esta función y funcionarlo.
Función pública UpdateMultiples ()
DoCmd.SetWarnings falso
ACTUALIZACIÓN de DoCmd.RunSQL la “[rep_imsu_bases de septiembre] FIJÓ BKR01B4 = “SBK731B4” donde nombre = “DM5HIS”; ”
ACTUALIZACIÓN de DoCmd.RunSQL la “[rep_imsu_bases de septiembre] FIJÓ BKR01B4 = “SBK931B4” donde nombre = “DM5INT”; ”
ACTUALIZACIÓN de DoCmd.RunSQL la “[rep_imsu_bases de septiembre] FIJÓ BKR01B4 = “SBK741B4” donde nombre = “DM5PRD”; ”
ACTUALIZACIÓN de DoCmd.RunSQL la “[rep_imsu_bases de septiembre] FIJÓ BKR01B4 = “SBK721B4” donde nombre = “DM5QAS”; ”
DoCmd.SetWarnings verdad
Función del final