Здравствуйте!
Вставляю для поля с гиперссылкой такой код

Private Sub СсылкаНаДоговор_Click()
On Error Resume Next
txtHyperlink.SetFocus
DoCmd.RunCommand acCmdInsertHyperlink
Exit Sub

где "СсылкаНаДоговор" соответственно поле для добавления оной
код проработал 5 минут и умер.
стала выдаваться ошибка Expected End Sub

Пожалуйста, пожалуйста помогите))

http://www.sql.ru/forum/1257504/pomogite-s-giperssylkoy