Discussion :

[darkspoilt]

Bonjour en fait j'aimerais faire des modif dans mon application Excel genre changmeent de taille etc... via Acces.

Lorsque j'utilise la macro automatique d'Excel
cela me donne ca

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
   appli.ActiveWindow.TabRatio = 0.532
    appli.ActiveWindow.ScrollWorkbookTabs Position:=xlFirst

J'aimerais ne pas avoir d'Active Windows(car on peut faire plusiseur chose a la fois)
donc j'ai essayé ca et cela ne marche pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
appli.Window("Microsoft Excel - e_analyse_croisée_Test.xls").TabRatio = 0.532
 appli.Window("Microsoft Excel - e_analyse_croisée_Test.xls").ScrollWorkbookTabs Position:=xlFirst

Si quelqu'un a une solution
Merci d'avance

[Lou Pitchoun]

Salut,

Ca ne marche pas....
Je pense savoir pourquoi.
Si tu as copié ton code d'excel vers access tel quel : c'est sur que ça ne marchera pas.

Il faut ouvrir une instance Excel dans Access.
Cf le tuto de cafeine :
http://cafeine.developpez.com/access/tutoriel/excel

[darkspoilt]

Appli est mon instance Excel via access

[Lou Pitchoun]

pourquoi as tu ("Microsoft Excel - e_analyse_croisée_Test.xls") ??
Si e_analyse_croisée_Test.xls est le nom de fichier :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

appli.Windows("e_analyse_croisée_Test.xls").TabRatio = 0.532

[darkspoilt]

Car le classeur fais partie d'une application excel et c'est le titre de ma fenêtre