Excel Active Workbook Open Another File

[daniel50096230]

Hi all,

I have the following code to open my workbook:

 Dim xlApp As Excel.Application = Nothing
                    Dim xlWorkBooks As Excel.Workbooks = Nothing
                    Dim xlWorkBook As Excel.Workbook = Nothing
                    Dim xlCells As Excel.Range = Nothing
                    xlApp = New Excel.Application
                    xlApp.DisplayAlerts = False
                    xlWorkBooks = xlApp.Workbooks
                    xlWorkBook = xlWorkBooks.Open(strFileName)
                    xlApp.Visible = True

I was able to open the workbook. But how can I using the active workbook to open another file through codes?