title: Runtime Error when calling userform with listbox
body: <p>hope you can help me out here, because I really can't see the error.</p>
  <p>I'm trying to create a Userform with a listbox, where the user can choose values from an array. The code for the array is below:</p>
  <pre><code>Dim arrayData   As Range
  Dim sh As Worksheet
  Dim Row_Count As Integer
  Dim i As Integer
  Dim lastRow2 As Long
  
  Set sh = ThisWorkbook.Sheets(&quot;Import&quot;)
  lastRow2 = sh.Columns(45).Find(&quot;*&quot;, , , , xlByRows, xlPrevious).Row
  
  Set arrayData = sh.Range(&quot;AS2:AS&quot; &amp; lastRow2)
  
  arArray = sh.Range(&quot;AS2:AS&quot; &amp; lastRow2)
  
  Row_Count = arrayData.Rows.Count
  
     
  For i = 1 To Row_Count
  
    
      arArray(i, 45) = Cells(i, 45).Value
  
  Next i
  </code></pre>
  <p>This works perfectly. Now I'm initializing the Userform:</p>
  <pre><code>Public Sub UserForm_Initialize()
  
  
  
  Auswertung.Lst_Tabellen.List.Clear
  
  
  Auswertung.Lst_Tabellen.List = arArray
  
  
  End Sub
  
  </code></pre>
  <p>But everytime I'm trying to call the userform &quot;Auswertung&quot;, I get the error &quot;Runtime Error 424: Object Required&quot;. Can you guys see the issue?</p>
  <pre><code>Public Sub Call_Userform()
  
  Auswertung.Show
  
  
  End Sub
  
  </code></pre>
  <p>The Debugger marks the line &quot;Auswertung.Show&quot;, when I run the code.</p>