Excel probleme d'ouverture

Résolu
benbill Messages postés 21 Date d'inscription mercredi 18 mai 2005 Statut Membre Dernière intervention 21 juin 2005 - 21 juin 2005 à 19:25
benbill Messages postés 21 Date d'inscription mercredi 18 mai 2005 Statut Membre Dernière intervention 21 juin 2005 - 21 juin 2005 à 20:31
Bonjour,
Je travaille sous access et :
J'ai un petit probleme avec le code qui suit. Il fait tout bien comme il faut mais au moment d'ouvrir excel, il le fait mais excel reste cacher. Et je me suis apercu qu'il tournait en arriere plan.
Quelqu'un connait-il un autre moyen d'ouvrir un fichier excel a partir d'access

'envoi vers fichier excel
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "graphique", "chemin d'accesau fichier", True, "A5:P22"


'Ouverture de l'application
Set appExcel = CreateObject("Excel.Application")
'Ouverture d'un fichier Excel
Set wbExcel = appExcel.Workbooks.Open("C:\Documents and Settings\Billiet Benoit\Bureau\medtronic\soutenance orale\SPC\SPC_sup\graphique_excel.XLS")
'wsExcel correspond à la première feuille du fichier
Set wsExcel = wbExcel.Worksheets(1)

Merci d'avance

2 réponses

cs_wape Messages postés 262 Date d'inscription samedi 21 décembre 2002 Statut Membre Dernière intervention 19 décembre 2010 12
21 juin 2005 à 20:20
Bonjour,

Si tu veux qu'Excel soit visible, il suffit d'ajouter :

appExcel.Visible = True

wape
3
benbill Messages postés 21 Date d'inscription mercredi 18 mai 2005 Statut Membre Dernière intervention 21 juin 2005
21 juin 2005 à 20:31
Merci
C'est tellement bete que je n'y avais mm pa seonger
Encore merci
0
Rejoignez-nous