В Excel VBA настроить все пользовательские формы из одной процедуры - PullRequest
0 голосов
/ 27 февраля 2019

У меня есть пользовательские формы, сгруппированные по схожим свойствам, которые пользователь может изменить.вместо того, чтобы делать это изменение в подпрограмме инициализации каждой пользовательской формы, я хочу сделать это в подпрограмме, чтобы сократить код.

Я получаю ошибку 438

Вызываемый подпрограмма и вызывающая сторона находятся ниже,Я получаю ошибку времени выполнения 438 и не могу ее устранить.

Public Sub customizeCurrentUserForm(ByRef userFormName_Send As Object)
            With userFormName_Send
                .Width = ThisWorkbook.canvasWidth
                ...
                ...
            End With
End Sub

Private Sub UserForm_Initialize()
    customizeCurrentUserForm (Me)
End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...