передать вариант из пользовательской формы в модуль - PullRequest
Новая
       12

передать вариант из пользовательской формы в модуль

0 голосов
/ 18 июня 2020

У меня есть модуль модуля, который вызывает пользовательскую форму с userform.show

в пользовательской форме. Я добавил исправление (budgetbox) и поместил следующий код на кнопку 

Private Sub CommandButton2_Click()


'data as range
Dim budgetRng As Range
Set budgetRng = Range(BudgetBox)

'vars for foreach
Dim budgetRow() As Variant
Dim i As Integer, BudgetCell As Range
i = 0

'var to store data
Dim budgetName As String
Dim budgetMoney As Long

'getting the data from each cell and fill the nested arrays
For Each BudgetCell In budgetRng
    budgetName = BudgetCell.Value
    budgetMoney = BudgetCell.Offset(, 2)
    ReDim Preserve budgetRow(i)
    budgetRow(i) = Array(budgetName, budgetMoney)
i = i + 1
Next BudgetCell
end sub

Чтобы моя работа была немного организована, я хотел бы передать массив (budgetRow) другому модулю, но я не могу понять это. Я знаю, что это как-то связано с настройкой правильных вещей для publi c, но это все.

надеюсь, вы, ребята, можете мне помочь

...