Aller au contenu


Aliboron

Inscrit(e) : 02 janv. 2008
Hors-ligne Dernière activité : Hier, 13:26
-----

Messages que j'ai posté

Dans le sujet : Obligation de mise à jour gratuite

25 novembre 2019 - 01:13

Je pense qu'on devrait modifier ta question ainsi :

Petite question : il me semblait que le Père Noël avait obligation de descendre dans ma cheminée si Noël tombait en décembre cette année.

 

Quelqu'un a-t-il déjà entendu parler de ça et saurait me trouver un texte officiel à ce sujet ?

 

:zz-big-cheers:


Dans le sujet : Excel vba Applescript

05 août 2019 - 12:43

MàJ : 

Bon, visiblement, ça n'accepte pas "as alias" d'une part et, surtout, l'envoi de toute la table comme paramètre ("Incompatibilité de type").

 

Petit complément : tu peux contourner le problème en envoyant les valeurs et pas la table en entier. Par exemple en intercalant cette boucle (et en transférant TouteListe au lieu de ma_liste, bien sûr) :

For i = 0 To 4
TouteListe = TouteListe & ma_liste(i) & ""","""
Next i
TouteListe = "" & Left(TouteListe, Len(TouteListe) - 3)

Dans le sujet : Excel vba Applescript

05 août 2019 - 09:13

Tu es sûr de "ma_liste(3)", je crois que là on ne passe que la valeur 3 de la liste.

 

Oui, cela ne passe que la valeur 3 de la liste. J'avais cru comprendre qu'avec {ma_liste, 3} tu passais toute la table juste pour en extraire la 3e valeur. Mais sinon, tu dois pouvoir envoyer .../...with parameters {""" & ma_liste &", 3" & """}".../... comme paramètre. Reste que je ne sais pas ce que ça va donner avec une table. Si j'ai une minute, je ferai un essai, pour voir...

 

MàJ : 

Bon, visiblement, ça n'accepte pas "as alias" d'une part et, surtout, l'envoi de toute la table comme paramètre ("Incompatibilité de type").

 


Dans tous les cas je me doutais que c'était la déclaration des paramètres qui coinçait.

Pas seulement. La déclaration de la table, la saisie des données, le chemin d'accès, ça compte aussi. ;)


Dans le sujet : Excel vba Applescript

05 août 2019 - 00:15

Plusieurs remarques : 

- Concernant le tableau ma_liste, tu ne peux pas utiliser les accolades {}

- Il faut renseigner les valeurs une par une

- Dans Applescript, les chemins d'accès sont au format posix

 

Donc en gros, ton code VBA doit plutôt ressembler à ça :

Sub essaiPassageAuto()

' Déclarations'
Dim ma_liste(0 To 4) As String
Dim ScriptToRun As String
Dim Res As String

' Initialisations'
ma_liste(0) = "a"
ma_liste(1) = "b"
ma_liste(2) = "c"
ma_liste(3) = "d"
ma_liste(4) = "e"

' Phrase de lancement Script'

ScriptToRun = "run script (""/Users/PATRICK/Desktop/DOSSIERS Desktop/Script-AppleScript/SuppressionElementListe.scpt"" as alias) with parameters {""" & ma_liste(3) & """}"

' Lancement avec retour dans Res'
Res = MacScript(ScriptToRun)

End Sub

En principe, ça devrait fonctionner.

 

Tu trouveras pas mal d'indications concernant les "mariages" VBA/Applescript sur les pages qu'y consacre Ron de Bruin.


Dans le sujet : Excel vba Applescript

04 août 2019 - 08:18

Est-ce que tu peux donner une description plus complète du script que tu veux envoyer via la commande MacScript() ? Est-ce que tu peux exécuter ce script avec les paramètres dans l'éditeur Applescript ?