Ошибка свойства RowSource vba

Question

Я пытаюсь написать код, который преобразует диапазон ввода в массив, а затем передает этот массив в RowSource для списка в моей форме.

Согласно MSDN свойство «RowSource» для списка/со списком должен принимать массивы, так что я не знаю, почему Im получаю ошибку во время выполнения здесь:

Option Explicit 

Sub test() 
Dim rng As Range 
Dim myarray As Variant 


Set rng = Worksheets("Sheet1").Range("List") 
myarray = RangeToArray(Range("List")) 
UserForm1.ListBox1.RowSource = "myarray" 


End Sub 
Function RangeToArray(inputRange As Range) As Variant 
    Dim inputArray As Variant 
    inputArray = inputRange.Value 

    'operations on inputArray 
    '...' 

    RangeToArray = inputArray 
End Function 

Answer 1

попробовать UserForm1.ListBox1.List = myarray

Answer 2

По Справка Excel VBA:

Свойство RowSource принимает диапазоны рабочих листов от Microsoft Excel.

Если у вас есть ссылка MSDN, в которой говорится иначе, отправьте ее.

В любом случае, чтобы получить результат, который вы хотите, изменить

UserForm1.ListBox1.RowSource = "myarray" 

в

UserForm1.ListBox1.List = myarray