Друзья, подскажите. Как передать массив из модуля в User form
объявил массив публичным но форма в упор не хочет его видеть и возникает ошибка
сам модуль типа такого:
Что и где не так...?
объявил массив публичным но форма в упор не хочет его видеть и возникает ошибка
Код |
---|
Private Sub UserForm_initialize() CBpost.List = apost() End Sub |
в модуле сверху
Код |
---|
Public apost() |
Код |
---|
sub www() for i=... .... Dim apost() ReDim Preserve apost(k) Set arr(k) = art apost(k) = furnbook.Worksheets("бла_бла").Cells(art.Row, rgc.Column) k = k + 1 ... next i end sub |