Populating Comobox with Excel Data.

[callumwk]

Hey everyone, the goal is to use a comobox (comobox1) to list data from an excel column.

I have:

Private Sub repairdone_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Dim oExcel As Object
        Dim oBook As Object
        Dim oSheet As Object

        oExcel = CreateObject("Excel.Application")
        oBook = oExcel.Workbooks.Open(My.Computer.FileSystem.SpecialDirectories.Desktop + "\Repairs.xlsx")
        oSheet = oBook.worksheets(1)
        ComboBox1. '''DUNNO WHAT GOES HERE''' = oSheet.range("A1")

    End Sub

Thanks for your help.