Visual Basic - Como imprimo un archivo binariooooooo!!

Hola a todos tengo un problema un archivo tipo excel es decir una planilla de calculo en un objeto ole y no encuentro la forma de imprimirla por favor ya nose se que hacer probe con el metodo PRINTOUT pero me devuelve un error:

VARIABLE DE TIPO OBJET O VARIABLE DE TIPO WITH NO ESTA ESTABLECIDA.

lo que pasa es que soy novato en lo que es trabajar con excel en realidad es la primera ves me esta matando esto es lo que hice hasta ahora si alguien me lo pudiera arreglar o decir que es lo que esta mal se lo agredeceria toda la vida!! desde ya muchas gracias.

Dim oExcelApp As Excel.Application
Dim oWs As Excel.Worksheet
Dim oWb As Excel.Workbook
Dim dirfile As String 'guarda la direccion del documento

dirfile = FrmCont.CD.FileName
Set oExcelApp = CreateObject("EXCEL.APPLICATION")
oExcelApp.Visible = False
oExcelApp.SheetsInNewWorkbook = 1
oExcelApp.Workbooks.Open FileName:=dirfile, ReadOnly:=False, IgnoreReadOnlyRecommended:=True
Dim nroHojas As Integer
nroHojas = 1
oWb.PrintOut (, , , False,,,)

si lo la tènès la comprais y ya podès imprimir.