Re-bonjour,
Est-ce qu'il existe un Gabarit "A" dans le document qui se nomme "Gabarit"?
Il faudrait peut-être créer une boîte de dialogue qui permette de
sélectionner les pages qui ont un certain gabarit.
O.
Le 12 avril 2018 à 18:18, Manu <manu@???> a écrit :
> Merci Olivier
>
> Oui avec du recul je pensais que c'était moins "usine à gaz" de supprimer
> des pages avec un gabarit précis
> donc des documents bien préparés avec des pages comportant un gabarit
> InDesign qui pourront être supprimés
>
> Plutôt que dire de supprimer les pages paires mais ne pas supprimer les
> pages qui comportent un "A-Gabarit"
>
> Voilà ce pourquoi
>
> Merci pour ce script amélioré
> mais en le testant il génère une erreur
> Au niveau du nom du gabarit "A-Gabarit"
>
>
> tell application "Adobe InDesign CC 2018"
> activate
> get document 1
> --> document id 37
> set label of every page of document id 37 to ""
> count every page of document id 37
> --> 18
> get name of applied master of page 18 of document id 37
> --> error "Objet incorrect pour cette demande." number
> 30614
> Résultat :
> error "Erreur dans Adobe InDesign CC 2018 : Objet incorrect pour cette
> demande." number 30614
>
>
>
>
> Le 2018-04-12 15:26, Olivier Berquin a écrit :
> > Bonjour Manu,
> >
> > Je ne comprends pas ce que tu cherches à faire maintenant…
> > Supprimer toutes les pages qui ont le gabarit A?
> > Même si ce sont des pages paires / impaires?
> > Peux-tu m'expliquer pourquoi?
> >
> > Je t'avais parlé d'un script amélioré… Le voici.
> > Attention: c'est la version qui supprime les pages paires et qui n'ont
> pas
> > le "A-Gabarit" appliqué.
> >
> > J'applique un "label" à toutes les pages qui doivent être supprimées (via
> > une boucle et un test).
> > Ensuite, je supprime toutes ces pages en une fois.
> > Cette méthode est bien plus rapide que la précédente.
> >
> > Oli.
> >
> >
> >
> > *tell* *application* "Adobe InDesign CC 2018"
> >
> > *activate*
> >
> > *set* myDoc *to* *document* 1
> >
> > *tell* myDoc
> >
> > -- Supprime tous les labels des pages
> >
> > *set* label *of* *every* *page* *to* ""
> >
> > -- Donne le nombre de pages du document
> >
> > *set* countPages *to* *count* *pages*
> >
> > -- pages impaires:
> >
> > -- set m to countPages - 1 + (countPages mod 2) -- max odd number <= n
> >
> > -- pages paires:
> >
> > *set* m *to* countPages - (countPages *mod* 2) -- nombre pair maximal <=
> n
> >
> > -- Je fais une boucle sur toutes les pages paires en commençant par la
> > dernière
> >
> > *repeat* *with* i *from* m *to* 1 *by* -2
> >
> > -- si le gabarit "A-Gabarit" n'est pas appliqué, alors j'applique le
> label
> > "delete" à cette page
> >
> > *if* (name *of* applied master *of* *page* i) ≠ "A-Gabarit" *then* *set*
> > label *of* *page* i *to* "delete"
> >
> > *end* *repeat*
> >
> > -- je supprime toutes les pages qui ont le label "delete"
> >
> > *delete* (*every* *page* *whose* label *is* "delete")
> >
> >
> > *end* *tell*
> >
> > *end* *tell*
> >
> >
> >
> >
> > Le 12 avril 2018 à 15:33, Manu <manu@???> a écrit :
> >
> > > Bonjour
> > >
> > > C'est vrai que mon énoncé n'est pas très clair
> > > c'est un code généré par FileMaker qui dit :
> > > si c'est un document recto suppriment le verso
> > > voilà pour la petite explication :)
> > >
> > > Sinon
> > > Y a-t-il moyen d'avec AppleScript pour simplifier le script ci-dessous
> > > de supprimer toutes les pages qui ont le nom d'un gabarit précis
> > > exemple : toutes les pages qui ont le "A-Gabarit » sont supprimées ?
> > >
> > > Merci pour votre aide
> > > Manu
> > >
> > >
> > > Le 2018-04-11 10:50, Olivier Berquin a écrit :
> > > > Bonjour Manu,
> > > >
> > > > Je vois déjà 2 soucis dans ton énoncé:
> > > > 1-Une page recto est bien une page impaire, n'est-ce pas?
> > > > Dans l'extrait de script que tu nous envoies, tu supprimes toutes les
> > > pages
> > > > paires…
> > > >
> > > > 2-Il faudrait veiller à utiliser des noms de variables parlants.
> > > > Tu es d'accord que tester une variable comme ceci:
> > > > if Blanc = "noir" then
> > > > est quelque peu curieux.
> > > >
> > > > Ici, tu écris
> > > > if Recto = "recto"…
> > > > À un autre endroit, tu pourrais avoir if Recto = "verso"…
> > > > Tu devrais avoir un nom de variable plus générique, comme "myPage" ou
> > > > "cettePage".
> > > >
> > > > Pour ton problème, il suffit de faire un test dans ta boucle.
> > > > Quelque chose comme
> > > > repeat with i from m to 1 by -2
> > > > if (name of applied master of page i) ≠ "Gabarit A" then delete page
> i
> > > > end repeat
> > > >
> > > > Je t'enverrai une version améliorée plus tard (je n'ai
> malheureusement
> > > pas
> > > > le temps de développer en ce moment).
> > > >
> > > > Belle journée.
> > > >
> > > > O.
> > > >
> > > > Le 11 avril 2018 à 09:39, Manu <manu@???> a écrit :
> > > >
> > > > > Bonjour
> > > > >
> > > > > est-ce que quelqu'un pourrait m'aider sur une amélioration d’un
> script
> > > > > utilisé dans InDesign ?
> > > > >
> > > > > j'utilise un script qui permet de supprimer les pages recto d'un
> > > document
> > > > > mais il y a des pages que j'aimerais conserver
> > > > > peut-on conserver les pages avec le nom d'un gabarit précis ?
> > > > > ou si ce n’est pas possible conservé des numéros de page ?
> > > > >
> > > > > voici le script que j'utilise aujourd'hui qui supprime les pages
> recto
> > > du
> > > > > document :
> > > > >
> > > > >
> > > > >
> > > > > Merci pour votre aide
> > > > > bonne journée
> > > > >
> > > > > Manu
> > > > >
> > > > >
> > > > > _______________________________________________
> > > > > Applescript_fr mailing list
> > > > > Applescript_fr@???
> > > > > http://listes.patpro.net/mailman/listinfo/applescript_fr
> > > > >
> > > >
> > > >
> > > >
> > > > --
> > > > Mac OS 10.11.6
> > > > Adobe CC 2017-2018
> > > > _______________________________________________
> > > > Applescript_fr mailing list
> > > > Applescript_fr@???
> > > > http://listes.patpro.net/mailman/listinfo/applescript_fr
> > > >
> > >
> > > Restant à votre entière disposition pour tout renseignement.
> > >
> > > Cordialement
> > > Emmanuel DEBONNET
> > >
> > >
> > > Créidéo
> > > 450 Route de Gruson
> > > 59830 CYSOING
> > > Tél. 03 20 34 54 54
> > > Fax 03 20 34 54 56
> > >
> > >
> > >
> > >
> > > _______________________________________________
> > > Applescript_fr mailing list
> > > Applescript_fr@???
> > > http://listes.patpro.net/mailman/listinfo/applescript_fr
> > >
> >
> >
> >
> > --
> > Mac OS 10.11.6
> > Adobe CC 2017-2018
> > _______________________________________________
> > Applescript_fr mailing list
> > Applescript_fr@???
> > http://listes.patpro.net/mailman/listinfo/applescript_fr
> >
>
> Restant à votre entière disposition pour tout renseignement.
>
> Cordialement
> Emmanuel DEBONNET
>
>
> Créidéo
> 450 Route de Gruson
> 59830 CYSOING
> Tél. 03 20 34 54 54
> Fax 03 20 34 54 56
>
>
>
>
> _______________________________________________
> Applescript_fr mailing list
> Applescript_fr@???
> http://listes.patpro.net/mailman/listinfo/applescript_fr
>
--
Mac OS 10.11.6
Adobe CC 2017-2018
_______________________________________________
Applescript_fr mailing list
Applescript_fr@???
http://listes.patpro.net/mailman/listinfo/applescript_fr
