Bonjour à vous,
Ayant cherché un peu partout, je ne trouve pas comment ajouter une référence sur VB2008; L'objectif étant de pouvoir créer un fichier excel avec VB2008. Lorsque je suis dans le menu "ajouter une référence", je sélectionne "Microsoft Excel 12.0 Object Library" mais rien ne se passe...
J'ai trouvé le code permettant de réaliser l'opération voulue :
Les objets comme "Excel.Application" sont soulignés indiquant qu'ils ne sont pas déclaré (la référence n'étant pas intégrée...?).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim oExcel As Excel.Application Dim oWk As Workbook Set oExcel = CreateObject("Excel.Application") oExcel.Visible = False 'Masque l'application excel (valeur par défaut) Set oWk = oExcel.Workbooks.Add 'rajoute par exemple la date et heure actuelle en Feuil1 cellule A1 oWk.Sheets(1).Range("A1") = Now 'Sauve le classeur oExcel.DisplayAlerts = False ' Pour éviter des questions si classeur déjà existant oWk.SaveAs App.Path & "\MonClasseur.xls" oWk.Close False 'Ferme le classeur oExcel.Quit Set oWk = Nothing Set oExcel = Nothing 'libération mémoire..
Pouvez vous m'orienter dans ma démarche ?
Partager