Discussion :

[badi14]

Bonjour,

Je dois exécuter une macro située dans un fichier Excel depuis Access après un clic sur un bouton dans mon formulaire Access.

Voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
 
dim xlapp as Excel.Application
 
Set xlApp = CreateObject("Excel.Application")
 
    xlApp.Visible = True
 
    xlApp.Workbooks.Open ("C:\Documents and Settings\duval_b\Bureau\Organigramme_ASC_09 à partir de Juin 2009.xls")
 
xlApp.Run "Organigramme_ASC_09 à partir de Juin 2009.xls!afficher_organigramme"

voici maintenant le code de ma macro dans le fichier Excel :Organigramme_ASC_09 à partir de Juin 2009.xls :

Code :

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

1
2
3
4
5
6
7
 
 
Public Sub afficher_organigramme()
 
Mise_à_jour_organigramme
 
End Sub

La fonction "Mise_à_jour_organigramme" est située juste après dans mon module Excel et elle est déclarée en Public


Et je me retrouve avec une erreur 91 "variable objet ou variable de bloc with non définie" sur la ligne ou j'éxécute la macro (xlApp.Run .....)
Alors que bizarrement cette macro s'exécute bien quand je la lance depuis mon fichier excel !!!



Merci d'avance si quelqu'un a une solution à ce problème

[Taoueret]

Essaye juste de mettre

Code :

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

1
2
3
4
 
xlApp.Application.Run "thisworkbook.afficher_organigramme"
'si le code de afficher organigramme est dans le module "thisWorkbook" de ton fichier Excel. 
'Si non, mets-y le nom de l'onglet Excel (et  non pas le nom du fichier)

[badi14]

Merci beaucoup ça marche très bien !!!