hello !

jai un petit pb

javais su ouvrir et ecrire sous excel a partir de vb a lecole
 je fais un copier coller de ce script sur mon programme et ca ne marche pas :

Dim fichier As Excel.Application
fichier.Workbooks.Open ("C:\facture.xls")
fichier.Visible = True
fichier.Sheets("facture").Select
fichier.Range("E1") = "bonjour"

meme ca je ny arrive pas et bien sur je v chercher la reference
Microsoft Excel 9.0 Object Library ou Microsoft Excel 8.0 Object Library
j'ai essayé les deux puis je suis aller voir sur plein d'autres site jai testé et ca ne marche toujours pas

alors si vous pouviez me dire ce qui cloche !! peut etre que c le composant mais bon... ca fait deja 2 mois et jen ai marre merci de votre reponse

Private Sub Command1_Click()
Dim fichier As Excel.Application
Set fichier = New Excel.Application
fichier.Workbooks.Open ("c:\facture.XLS")
fichier.Application.Visible = True
fichier.Sheets("facture").Select
fichier.Sheets("facture").Range("E1").Value = "Salut"
fichier.Application.Quit
Set fichier = Nothing
End Sub

jpleroisse

merci c sympa davoir répondu mais ca marche pas lol

c toujours le meme message d'erreur :
Erreur d'exécution '-2147417851(20010105)': La méthode 'Open" de l'objet 'Workbooks' a échoué

pour plus de précision en fait jutilise Office 97 et le composant offert d'origine est Microsoft Excel 8.0 Object Library