我有按相似属性分组的用户表单,用户可以更改。与其在每个用户窗体的初始化子窗口中进行此更改,不如在子窗口中进行此操作以缩短代码。
我收到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