Problème lié à l'activation des fenêtres dans les présentations

[nen]

Bonjour le forum :D ,

 

J’ai un petit problème :unsure: , j'aurais besoin de votre aide avec un dézoom des fenêtres dans plusieurs présentations (onglet)

Je pense qu’un jour tout le monde a été confronté à cette problématique.

Le dézoom à l'activation des fenêtres dans les présentations avec la variable UCSFOLLOW = 1.

 

Serait-il possible de le régler avec un lisp ou autre automatisation à remettre la variable "UCSFOLLOW = 0" dans toutes les fenêtres dans toutes les présentations ?

 

 

Meilleures salutations

[Maxime063]

Bonjour,

 

Tu peux développer ? pour ma part, la variable UCSFOLLOW est toujours égale à 0 dans les nouvelles fenêtres.

Je suppose donc que tu modifies la variable manuellement à 1 au préalable et souhaite à la fin la restituée à 0 ?

[Tramber]

Je fais souvent cette intervention : on peut faire en script

Voir ici

 

genre :

 

CVPORT 3 UCSFOLLOW 0
CVPORT 4 UCSFOLLOW 0
CVPORT 5 UCSFOLLOW 0

[Curlygoth]

Alors je sais le VBA vous n'aimez pas mais bon c'est pas grave je le mets pour infos :

 

en 1 bouton :

If ThisDrawing.GetVariable("UCSFOLLOW") = 1 then
ThisDrawing.SetVariable "UCSFOLLOW", 0
else
ThisDrawing.SetVariable "UCSFOLLOW", 1
end if

[Maxime063]

Alors s'il s'agit de ça, voici la version lisp que j'avais

 

(defun c:VarriablePickStyle ( / ucs)

(setq ucs (getvar "UCSFOLLOW"))

(if (= ucs 1)
	(setvar "UCSFOLLOW" 0) 
);if
(prin1)
(if (= ucs 0)
	(setvar "UCSFOLLOW" 1) 
);if
(prin1)

);defun

[nen]

Bonjour,

 

Tu peux développer ? pour ma part, la variable UCSFOLLOW est toujours égale à 0 dans les nouvelles fenêtres.

Je suppose donc que tu modifies la variable manuellement à 1 au préalable et souhaite à la fin la restituée à 0 ?

 

 

En effet mes collègues quand il tourne le SCU ils utilisent la commande tourner le SCU par Objet et avive la coche "Basculer en vue plane quand le SCU est modifié" (UCSFOLLOW=1).

Par contre quand il sorte de la fenêtre il oublie de désactiver "Basculer en vue plane quand le SCU est modifié" (UCSFOLLOW=0) et sur plusieur onglets. :angry:

 

Comment faire pour tous les mettre en UCSFOLLOW=0

[nen]

Alors s'il s'agit de ça, voici la version lisp que j'avais

 

(defun c:VarriablePickStyle ( / ucs)

(setq ucs (getvar "UCSFOLLOW"))

(if (= ucs 1)
	(setvar "UCSFOLLOW" 0) 
);if
(prin1)
(if (= ucs 0)
	(setvar "UCSFOLLOW" 1) 
);if
(prin1)

);defun

 

 

J'ai testé ton lisp malheureusement toutes mes fenêtres sont restées avec UCSFOLLOW=1 :blink:

[Olivier Eckmann]

Bonjour,

 

ICI le lisp téléchargeable chez nos amis tchèques qui permet de mettre à 0 ou à 1 toutes les fenêtres de toutes les présentations.

 

Olivier

[Tramber]

En effet mes collègues quand il tourne le SCU ils utilisent la commande tourner le SCU par Objet et avive la coche "Basculer en vue plane quand le SCU est modifié" (UCSFOLLOW=1).

Par contre quand il sorte de la fenêtre il oublie de désactiver "Basculer en vue plane quand le SCU est modifié" (UCSFOLLOW=0) et sur plusieur onglets. :angry:

 

Comment faire pour tous les mettre en UCSFOLLOW=0

 

Ils feraient bien d'utiliser la commande REPERE, tes collègues B)

Le script doit fonctionner, beaucoup d'utilisateurs, de lispeur etc ne pensent pas aux scripts. Avec Excel on fait pourtant des miracles rapides et compatibles LT.

[nen]

Bonjour,

 

ICI le lisp téléchargeable chez nos amis tchèques qui permet de mettre à 0 ou à 1 toutes les fenêtres de toutes les présentations.

 

Olivier

 

 

Super merci cela fonctionne impeccable :D

Ce qui sont fort ses Tchèques ;)

[nen]

Ils feraient bien d'utiliser la commande REPERE, tes collègues B)

Le script doit fonctionner, beaucoup d'utilisateurs, de lispeur etc ne pensent pas aux scripts. Avec Excel on fait pourtant des miracles rapides et compatibles LT.

 

 

Oui en effet mais bon c'est difficile d'imposer des commandes, il y a des mauvaises habitudes difficile à perdre ;)

Je suis d'accord avec toi mais cela demande de connaitre Excel au niveau VBA ce n'est donné à tout le monde.

 

 

Merci de votre aide

Toujours aussi efficace le forum ;-)

[Tramber]

Je suis d'accord avec toi mais cela demande de connaitre Excel au niveau VBA ce n'est donné à tout le monde.

La formule concatener ?!!! Du niveau VBA ???

Beaucoup, beaucoup plus simpe !

[nen]

La formule concatener ?!!! Du niveau VBA ???

Beaucoup, beaucoup plus simpe !

 

Donne-moi ta formule, dis-moi comment faire et je veux bien essayer :D

Il faut toujours apprendre de nouvelle chose :)

[Tramber]

=concatener (les références de cellules), voir l'aide....

C'est à toi de faire l'effort de fusionner deux cellules dans une troisième, tu sauras ainsi batir des colonnes de script qu'il suffit de copier-coller dans ton fichier SCR.

C'est trop basique pour je puisse en dire + !

 

Ici c'est facile de porter CVPORT jusqu'à une valeur genre 64... le script s'arretera quand CVPORT ne pourra plus dépasser la valeur du nombre de fenetres -2.

Quand j'ai une opération à faire sur les fenêtres, je ne me fais jamais suer, j'utilise cette astuce sachant que tu peux très bien lancer une fonction lisp dans un script quand c'est pas LT.