I need some advice on loading Excel values into a Listbox in a form (Form2) different than the main form (Form1).
In Form 1 I have the followingI then access Form2 using:Code:Public xlApp As Excel.Application Public xlBook As Excel.Workbook Public xlSheetData As Excel.Worksheet Private Sub Form_Load() Set xlApp = New Excel.Application Set xlBook = xlApp.Workbooks.Open(App.Path & "\myFile.xls") Set xlSheetData = xlBook.Worksheets("input") End SubOn Form2 I have a Listbox that I want to populate with values from the worksheet "input" when this form loads. I tried"Code:Private Sub mnuData_Click() Form2.Show vbModeless, Me End Subbut VB doesn't like my use of DataSource . Any suggestions?Code:Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheetData As Excel.Worksheet Set xlSheetData = xlBook.Worksheets("input") List1.DataSource = xlSheetData.Cells("D26..D50").Value end sub




Reply With Quote