Discussion :

[toma65]

Bonjour,

J'ai mes deux fichiers ouverts: Powerpoint et Excel et je cherche à lancer ma macro excel depuis une macro powerpoint
j'ai deja essayé ca mais ca ne fonctionne pas:

Code :

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

Application.run "fichier.xls!feuil2.macroexcel"

Mais il me dit sub or function not defined

Si quelqu'un à une idée

Merci

Toma

[toma65]

Bonjour,

Personne n'a une petite idée...

[flo_flo]

Bonjour !

Perso j'utilise cette macro :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub MacroExcel()
 
Dim MonObjet As Object
Set MonObjet = GetObject("", "Excel.Sheet")
 
MonObjet.Application.Visible = True
MonObjet.Application.Workbooks.Open "chemin de ton fichier"
MonObjet.Application.Run "nom de ta macro"
 
Set MonObjet = Nothing
End Sub

Tu peux vérifier si elle fonctionne, si oui, tant mieux, sinon, peut-être que ca t'éclairera

[toma65]

Merci pour ton code,
Il marche mais seulement si le fichier n'est pas déjà ouvert.
Là ca me fait ouvrir une deuxième fois le fichier et donc je perds toutes les modifs du fichier.

Mais merci pour ton aide

je cherche...

[toma65]

Par contre je m'explique:
J'ai une première macro (vba powerpoint) dans un userform1 qui m'ouvre le fichier excel et exécute une serie d'opérations sur mes fichiers powerpoint et excel.
Et, ce que je veux c'est executer dans un userform2 une macro de ce même fichier excel (vba excel).

Donc, quand je mets dans mon userform2 simplement le code suivant:

Code :

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

1
2
3
Private Sub CommandButton1_Click()
MonObjet.Run "ma_macro_excel"
End Sub

Il me dit : "Objet requis"

Alors que ci je le mets dans le userform1 pour tester, ça marche.

Il doit falloir que je définisse quelque chose mais quoi?

[flo_flo]

Essaie en supprimant la ligne :

Code :

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

1
2
 
Set MonObjet = Nothing

Sinon je pense qu'il faut que tu définisses de quel Object tu parles (Feuille Excel, etc)