This code is straight from Microsoft's pages

Code:
 Dim oExcel As Object
            Dim oBook As Object
            Dim oSheet As Object

            'Start a new workbook in Excel.
            oExcel = CreateObject("Excel.Application")
            oBook = oExcel.Workbooks.Add
With Option Strict On you get "option strict disallows late binding" on the last line.

How do you fix that?