В Module4 находятся строки

Dim rs As Recordset
Dim ws As WorkSpace
Dim db As database
Dim BookMark_my As Variant

Почему error при выполнении кода щелчка на кнопке в форме ?
Run-time error ‘424’
Object required

Нет, НЕ ПРИСВОЕНО, в книге в примере
отсутствует, а я, как прилежный ученик,
СПИСАЛ один к одному.

Такие у нас книжки ...
одно опустили, другое забыли напечатать,

сделали просто опечатку, а начальство
вне досягаемости звука :
та он же тупой ( имею ввиду начинающего
программиста )

СПАСИБО, если не трудно, напишмте

SET ..... ведь надо указать базу данных