Bonjour,
Je cherche à lancer une requête BO XI depuis excel : j'arrive donc à ouvrir BO, ouvrir ma requête depuis son dossier, la rafraichir, mais le problème est que je n'arrive pas a faire le "copier tout" dans BO, puis coller dans excel. (je ne veux pas faire un expor excel mais un copier tout car le fichier existe déjà, j'écrase la version précédente)
Quelqu'un aurait-il une idée ?
Voila le début de mon code :
Sub openBO()
Dim objBO, objrep
'Ouvre Business Object
Set objBO = CreateObject("BusinessObjects.Application.11")
'Rentre le login et mdp
objBO.LoginAs "XXXXXXX", "******", False, enterprise
'Ouvre le rapport
Set objrep = objBO.Documents.Open("Y:\aaa\bbb\" & Range("date") & "\cccc\dddd\requêteBO.rep")
objBO.Visible = True
'Rafraichir le rapport
objrep.Refresh
End Sub
