Code VBA access 2000 sous Vista

Question

Bonjour,
Access 2000 sous Vista

J'ouvre un classeur Excel à partir d'un code VBA Access. Le classeur s'ouvre mais en clignotant dans la barre de tâches et les codes "xlmaximized" "vbmaximizeFocus" sont inopérants. Par contre, il suffit que j'ouvre l'éditeur VBA et que je le referme aussitôt pour que la fenêtre du classeur apparaisse normalement en "maximize" sur l'écran après le lancement de la procédure. S'agit-il d'un problème d'initialisation de VBA sous Vista ou peut-on contourner le problème avec quelques lignes de code. Merci à ceux qui ont une idée de me la faire partager.

cboulas · Answer

Salut,

Cela me le fait en ouvrant simplement Excel, y'a une histoire de message de mise à jour là dedant ou d'un form qui s'affiche sans s'afficher. pb non résolu

Chris...
- La vérité n'est pas ailleurs, elle est sous le nez de chacun, quelques mouvements neuronale permettent de l'entrevoir -
MCPD (webform-winform) / MCSA / MCDST / MCT

jujubegood · Answer

Bonjour,
je mets ci-dessous mon code VBA Access qui génère cette anomalie à l'ouverture d'Excel :
 Dim AppExcel As Object
  Set AppExcel = Excel.Application
  With AppExcel
  .UserControl = True
  .Visible = True
.workbooks.Open ("C:\Users\JUJU\Documents\Test.xls"), vbMaximizedFocus
.Run ("Test.xls!NomModuleExcel")
 End With

Ce matin j'ai trouvé sur le site de Microsoft un morceau de code qui m'a permis de contourner le problème :

Dim chan
Shell ("C:\Program Files\Microsoft Office\Office\excel.exe C:\Users\JUJU\Documents\Test.xls"), vbMaximizedFocus

chan = DDEInitiate("Excel", "System")
         DDEExecute chan, "[Run(""Test.xls!NomModuleExcel"")]"
         DDETerminate chan

Code VBA access 2000 sous Vista

2 réponses

Votre réponse

Discussions similaires