Bonjour,
J'ai crée une macro pour exporter le rapport d'une requête BO vers Excel, voici le code :
Sub bo()
Dim objBO, objrep
'Ouvre Business Object
Set objBO = CreateObject("BusinessObjects.Application.5")
'Rentre le login et mdp
objBO.LoginAs "yelghissassi", "yel", False, ARJOWIGGINS
'Ouvre le rapport
Set objrep = objBO.Documents.Open("C:\Bidouille\Essai.rep")
objBO.Visible = True
'Rafraichir le rapport
objrep.Refresh
Dim doc As Report
Set doc = Application.ActiveDocument.Reports.Item(1)
doc.Activate
ActiveReport.ExportAsText (ThisDocument.Path & "\OA spec.txt")
End Sub
Quand j'exécute la macro, il m'affiche une message me disant que le "type défini par l'utilisateur non défini", et il me met Dim doc As Report en jaune, donc c'est le type Report qui ne connait pas?
et même quand je met
objrep.Reports.Item(1).ExportAsExcel ("le nom chemin et le nom du fichier excel") ça ne marche pas, quelqu'un peut-il m'aider SVp?
Excel 2000, VB 6.0
Merci.
Configuration: Windows 2000
Firefox 3.5.3