Liaison Excel - Apple Script

Bonjour,

Je fais appel à la bonne volonté pour proposer une solution à ce simple problème. Je travaille avec excel 2011, sous OS 10.7.5

Dans une procédure avec Excel, j'ai cette instruction :
MacScript ("EnvoiCourriel")
qui doit exécuter le script et je reçois un message d'erreur n° 5.

Dans le script pour reprendre une variable du programme je commence avec

Code:

---

1 2 3 4

tell application "Microsoft Excel" activate copy value of cell "courriel" to objet end tell

---

puis j'ouvre mail (à partir de là tout va bien)

Code:

---

1 2 3

Tell application "Mail" -- Instructions End tell

---

J'ai l'impression que le message d'erreur provient de ce que je demande dans le script d'ouvrir excel qui est resté ouvert.

Question : y a t-il une autre procédure pour récupérer le contenu des variables d'excel lorsque excel reste ouvert.

Merci.

JFZ

Bonsoir Jefmonde,
Pour lancer un script à partir de VBA, je ne connais que 2 solutions :

Tu écris ton AppleScript, tu l'enregistres dans un fichier ".scpt" habituel et dans VBA tu ecris :

Code:

---

1 2 3 4

Sub Lance_Script() s = "run script (""xxx:Users:xxx:Desktop:Test_Script.scpt"" as alias)" temp = MacScript(s) End Sub

---

C'est ici un exemple de script "Test_Script" sur mon bureau. Le chemin d'accès complet doit partir de la racine du disque. Attention aux doubles guillements !


La seconde méthode consiste à créer, en VBA, une string qui contient tout ton script. Les instructions AppleScript doivent être séparées par des retours à la lignes (CR).
une fois la string construite, on utilise encore l'instruction VBA MacScript
La limitation est, en général, la taille du script, par contre, il est possible de passer des variables. voici un exemple en VBA :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub Lance_Script() Dim SS As String Ma_Var = Cells(1, 1).Value CR = Chr$(13) Gu = Chr$(34) SS = "tell application ""Finder""" SS = SS & CR & "Set AS_Var to " & Gu & Ma_Var & Gu SS = SS & CR & "display dialog ""parametre="" & " & " AS_Var" SS = SS & CR & "end tell" temp = MacScript(SS) End Sub

---

Ce script ne fait que récupérer la valeur de la cellule Excel A1 (1,1), puis l'affecte à une variable AppleScript AS_Var.
Cette variable est affichée par un display dialog.

J'espère que cela t'aidera.
Dans les 2 cas, il faut que ton script ne contienne pas d'erreur, sinon la macro VBA ne finira pas l'instruction MacScript. par exemple, dans le second cas, si tu clique sur le bouton annuler du dialog, VBA donnera une erreur. Ceci peut aussi être contourné en VBA avec un "on error resume next".

Je précise qu'il est aussi souvent préférable de tout faire en script (si tu as peu de calcul excel) car Excel se pilote aussi en AppleScript.
A toi de déterminer la meilleure option !

Cordialement

Bonjour,

Merci PBell pour votre aide.

J'étudie votre réponse, la teste, et je reviens pour le résultat.

Cordialement

jfz

Bonjour,

Merci à PBell qui m'a réconforté dans sa réponse : d'une part il ne retient pas l'hypothèse que j'avais émise (l'erreur était ailleurs), d'autre part il confirme le code à écrire dans VBA (l'erreur est donc dans l'écriture de l'instruction).
Mon erreur était due à ma stupidité. Voici l'instruction telle qu'elle doit être:

Code:

---

1 2	ChDir "MacCatherine:Programmes:" MacScript ("EnvoiCourriel.scpt")

---

ou le non du script est "EnvoiCourriel".
J'avais simplement oublié d'indiquer le chemin pour arriver jusqu'au script (chDir...) et j'avais pas mis l'extension (.scpt) après le nom du script dans VBA d'Excel. Rien que cela!

Si l'un d'entre-vous était intéressé je pourrai modestement indiquer ce que je sais des liaisons entre Excel et Applescript;
et ce que je sais de l'enregistrement au format pdf des documents Word et feuilles d'Excel.

Cordialement

JFZ