Discussion :

[sebastien_oasis]

Bonjour,

je viens vous faire part de mon probleme relatif à un code vba sous access qui doit lancer une macro d un classeur excel. Le code en question est le suivant:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim xlApp1, xlApp2 As Excel.Application
    Dim xlSheet As Excel.Worksheet
    Dim xlBook1, xlbook2 As Excel.Workbook
    Dim filename As String
 
    Set xlApp1 = CreateObject("Excel.Application")
    Set xlApp2 = CreateObject("Excel.Application")
    Set xlBook1 = xlApp1.Workbooks.Open("C:\Vielle\Automatische_FMEA_essai_pour_access.xls") ' j ouvre le classeur qui contient la macro
    Set xlbook2 = xlApp2.Workbooks.Add
 
    Set xlApp1 = Application.Run("Automatische_FMEA_Prozess_Modul") ' voici la ligne qui fait planter
 
' plus d autres choses concernant le deuxieme workbook..

Le soucis intervient au niveau de la ligne d execution. J ai pourtant pris note de l aide et puis essayé différentes syntaxes... le message d erreur est toujours le meme a savoir qu il ne trouve pas la macro "Automatische_FMEA_Prozess_Modul"

Avez vous deja rencontré ce genre de probleme ou avez vous en rayon un code similaire au mien? (j ai pas reussi a en trouver un dans la FAQ)

Merci par avance pour votre aide et le temps passé.

Sebastien

[Lou Pitchoun]

Salut,

As tu essayé :

Code :

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

xlApp1.Run("Automatische_FMEA_Prozess_Modul")

[sebastien_oasis]

Merci beucoup kikof,

c est vrai que c'est tout simple mais je n y avait pas pensé.

Ca marche impeccable!

Sebastien