Private Sub RadnoMjesto_DblClick(Cancel As Integer)
DoCmd.OpenForm "F_VrstaPosla"
End Sub