Reading Excel file into Combo Box

VBnewcomer
VBnewcomer used Ask the Experts™
on
I need my program to read an Excel file and insert contents of a column into a combo or list box. VB gurus out there..HELP!!!
Comment
Watch Question

Do more with

Expert Office
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
Dim MyExcel As Object
Dim MyWorkbook As Object
Dim MyCell As Variant

Set MyExcel = CreateObject("Excel.Application")
Set MyWorkbook = MyExcel.Workbooks.Open("X:\Temp\Book1.xls")
For Each MyCell In MyWorkbook.ActiveSheet.Range("A1:A5")
  Combo1.AddItem MyCell.Value
Next

Do more with

Expert Office
Submit tech questions to Ask the Experts™ at any time to receive solutions, advice, and new ideas from leading industry professionals.

Start 7-Day Free Trial