Masquer des calques dans toutes les fenêtres de certaines présentations

[Curlygoth]

Suite à cette conversation ci-dessus :

Et ne voulant surtout pas écrire du VBA dans le topic de la section Lisp ^^ voici une solution en VBA...

Certes surement moins performante et bien moins complète que l'outil proposé en lisp (et je ne reviendrais pas sur ce débat perdu d'avance...)

mais voici une solution (c'est une premiere version) donc les sélections inverse ni sont pas...

la sélections des fenetres pour chaque présentations ni est pas non plus^^ (par filtre de propriétés)

la macro de lancement depuis votre macro :

sub votrenomquevousvoulez

ThisDrawing.Application.LoadDVB "C:\...\GEST_CALQUE_PRESENTATION.dvb"
ThisDrawing.Application.RunMacro ("C:\...\GEST_CALQUE_PRESENTATION.dvb!AFF.AFF")

end sub

 

 

GEST_CALQUE_PRESENTATION.dvb