Case 1 'Otvori formu DoCmd.OpenForm ImeObjekta, , , , , acIcon Set Frm = Forms(ImeObjekta) Frm.SetFocus Frm.RecordSource ="SELECT * FROM tblOperatori WHERE KorisnikID=" _ & M_Oper.OperID) DoCmd.Restore