Erreur lors de l'exportation vers excel

Salut tout le monde
 je veux faire une exportation de vb vers excel mais je suis confronter a une erreur lorsque je declare
Dim xls As Excel.Workbook 
quand j'arrive à as excel n'apparait pas
et losque je declare
Dim xls As New Application
et jarrive à new apllication n'apparait pas


est ce que quelqu'un peut m'aider
s'il vous plait

Merci

As-tu référencé Micosotf  "Excel x.0 Object Libray" dans Projet/Références.
Si non fais-le, Si oui essaye ce code.Tu modifieras ensuite pour ton Prg.

Private Sub Command1_Click()
Dim objXL As New Excel.Application
Dim wbXL As New Excel.Workbook
Dim wsXL As New Excel.Worksheet

If Not IsObject(objXL) Then
    MsgBox "Vous Avez Besoin de Microsoft Excel  pour cette Fonction", vbExclamation, "Excel"
    Exit Sub
End If

' Ouvre Excel
objXL.Visible = True
Set wbXL = objXL.Workbooks.Add
Set wsXL = objXL.ActiveSheet

wsXL.Cells(1, 1).Value = 123456

End Sub

jpleroisse