1 2 3 4 5 6 7 8 | Укажите процедуру с ключевым словом Private, например:Private Sub Test() MsgBox "Hello, World", vbSystemModal, ""End SubИли используйте инструкцию Option Private Module которая должна располагаться перед программами и функциями. |