AUTOCAD 2010 GELÉS TOUS LES CALQUES SAUF 2 EN VBA

fabdu91630 Messages postés 22 Date d'inscription vendredi 20 mai 2011 Statut Membre Dernière intervention 31 mai 2011 - 27 mai 2011 à 08:54
fabdu91630 Messages postés 22 Date d'inscription vendredi 20 mai 2011 Statut Membre Dernière intervention 31 mai 2011 - 31 mai 2011 à 05:28
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/53218-autocad-2010-geles-tous-les-calques-sauf-2-en-vba

fabdu91630 Messages postés 22 Date d'inscription vendredi 20 mai 2011 Statut Membre Dernière intervention 31 mai 2011
31 mai 2011 à 05:28
J'ai deja specifier que effectivement c'etait le calque courant qui ne poucait pas pas etre geles mais j'ai pris le calque 0 en reference car c'est lui de bas qui edt courant.
BigDieu Messages postés 12 Date d'inscription vendredi 1 mars 2002 Statut Membre Dernière intervention 20 juin 2008
30 mai 2011 à 23:38
bonjour
Tu peux aussi geler le calque "0". par contre, tu ne peux pas geler le calque courant. il serait bon de faire un test la dessus. Un indice de mémoire, remplace :
If calque.Name <> "0" Then calque.Freeze = True
par
if calque.name <>Thisdrawing.ActiveLayer then calque.freeze = true
a+
fabdu91630 Messages postés 22 Date d'inscription vendredi 20 mai 2011 Statut Membre Dernière intervention 31 mai 2011
30 mai 2011 à 19:15
Oui c'est a peu pres la meme chose, mise a par qu'avec le programmre que je fait je dois faire une macro qui dois etre automatisé afin var senait pas que pour un plan mais faire ceci sur 8 plans et chaque plan a 100 calques.
sper129 Messages postés 5 Date d'inscription dimanche 17 janvier 2010 Statut Membre Dernière intervention 30 mai 2011
30 mai 2011 à 19:10
Bonjour
Je ne sais pas si dans autocad 2010 c'est pareil , mais dans 2005 avec la barre d'outil "express" , on peut faire cela. Il suffit de sélectionner le ou les calques ( avec ctrl) que l'on veut garder et les autres sont caché.
fabdu91630 Messages postés 22 Date d'inscription vendredi 20 mai 2011 Statut Membre Dernière intervention 31 mai 2011
27 mai 2011 à 08:54
Après la syntaxe (End Sub) supprimé tous ce qui est après sub exemple : End Sub > End Sub.
Rejoignez-nous