Could not set the RowSource Property. Invalid Property Value
<p>I have an excel where I have populated few data in column 'A', I want the data to appear in the List box which is in my User Form. But I'm repeatedly getting the Run-time Error 380 stating "Could not set the RowSource Property. Invalid property value" 
Below is the code.</p>

<pre><code>Private Sub ComboBox1_Change()

Dim wb123 As Workbook, TempFile As Workbook
Dim Tempsheet As Worksheet
Dim Last_Row As Integer


 Set wb123 = ThisWorkbook
Set TempFile = Workbooks.Open("C:\Users\inkapb\AppData\Local\Temp\EPC AutoTool\Projects\" &amp; Me.ComboBox1.Text &amp; "\Template.xlsm")

 Set Tempsheet = TempFile.Worksheets("Sheet2")
Last_Row = Tempsheet.Cells(Tempsheet.Rows.count, "A").End(xlUp).Row

     With ListBox1

    .ColumnCount = 1
    .ColumnWidths = "50"
    .RowSource = Tempsheet.Range("A2:A" &amp; Last_Row).Address
End With


End Sub
</code></pre>

<p>And here is my excel sheet which contains the data.</p>

<p><a href="https://i.stack.imgur.com/P4ZgA.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/P4ZgA.png" alt="enter image description here"></a></p>