Moro!
Tein tietokantaan ohjatulla makrotoiminnolla (SiirryTietueeseen) nappulan, jolla pääsee selaamaan tietueita. Mutta kun ollaan lopussa sihen tulee ärsyttävä huomautus, ettei pääse jatkamaan ...aargh. Mitä voisin tehdä koodille, ettei tulis huomautuslaatikkoa, vaan ohjelma menis viimeisen tietueen jälkeen esim alkuun. Tällä hetkellä koodi on tällänen:
Private Sub Seuraava_Click()
On Error GoTo Err_Seuraava_Click
Screen.PreviousControl.SetFocus
DoCmd.FindNext
Exit_Seuraava_Click:
Exit Sub
Err_Seuraava_Click:
MsgBox Err.Description
Resume Exit_Seuraava_Click
End Sub
Tein tietokantaan ohjatulla makrotoiminnolla (SiirryTietueeseen) nappulan, jolla pääsee selaamaan tietueita. Mutta kun ollaan lopussa sihen tulee ärsyttävä huomautus, ettei pääse jatkamaan ...aargh. Mitä voisin tehdä koodille, ettei tulis huomautuslaatikkoa, vaan ohjelma menis viimeisen tietueen jälkeen esim alkuun. Tällä hetkellä koodi on tällänen:
Private Sub Seuraava_Click()
On Error GoTo Err_Seuraava_Click
Screen.PreviousControl.SetFocus
DoCmd.FindNext
Exit_Seuraava_Click:
Exit Sub
Err_Seuraava_Click:
MsgBox Err.Description
Resume Exit_Seuraava_Click
End Sub
Vastaukset 1
Vanhimmat
Asioita selviää, kun viittii tarpeeks tutkia... Eli ongelma ratkaistu.