Введите значения пользовательской формы во время выполнения, в VBA - PullRequest
1 голос
/ 10 октября 2019

enter image description here Я пытаюсь добавить значения в массив с помощью пользовательской формы. Массив большой, поэтому я меняю значения только по определенным показателям. Я могу легко добавить первый набор значений, но я хочу сделать это потенциально более одного раза. Я хочу добиться того же результата, что и при использовании цикла while на inputBox. Но inputBox неэффективен, потому что у меня есть несколько значений столбцов, которые добавляются строка за строкой. Смотрите пример кода ниже

If chkBoxTT.Value Then
    r = FindIndex(someArray, txtBoxID.Value)
    Do
        For j = 1 To 5
            y = "txtBox" & j
            Set contr = Controls(y)
            arr(r, j) = CDbl(contr.Value) / 100
        Next j
        'I want to show the form and input new values as long as below condition is true
    Loop While chkBoxDone.Value = False
End If
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...