Listbox to existing Excel

I finally found a site which had (more or less) what I was looking for and was able to complete that portion of my project. For the edification of others, the specific site address is:
http://www.vb-helper.com/howto_net_write_excel.html 

This does not look materially different from what I have. The line of code that reads:
Dim xlWkSheet ... is where my debugger always locks up with the usual "0x8..." type of code that is nearly indecipherable. I can submit my error code, but I doubt if it will be of any use. I am obviously not coding that particular line correctly. Also, how can you use a variable before you have declared it (myExApp.Visible?).

try this

Private Sub ReportToExcel_Click()
'EXPORT to EXCEL


Dim i As Long                       'variable for ColumnCount
Dim j As Long                       'variable for ListCount



myExApp.Visible = True              'Sets Excel visible

Dim myExApp As New Excel.Application
Dim xlWkBook = myExApp.Workbooks.Open("C:\NFL_2012.xls")
Dim myExSheet= xlWkBook.Worksheets("Sheet_1")


For i = 1 To ReportRecordList.ColumnCount   'Counter for ColumnCount
    ReportRecordList.BoundColumn = ReportRecordList.BoundColumn + 1 'Setting counter for BoundColumn
    For j = 1 To ReportRecordList.ListCount 'Counter for ListCount
        myExSheet.Cells(j , i) = ReportRecordList.ItemData(j - 1)    'Insert ItemData into Excel Worksheet
    Next j  'Iterating through ListCount
Next i  'Iterating through ColumnCount
ReportRecordList.BoundColumn = 1    'Setting BoundColumn to original 1


Set myExSheet = Nothing 'Release Worksheet
Set myExApp = Nothing   'Release Excel Application


End Sub