AUTOCAD Congelar planos en VBA

Resuelto
fabdu91630 -  
fabdu91630 Mensajes publicados 22 Fecha de registro   Estado Miembro Última intervención   -
Hola,

En Autocad 2010

Quiero congelar las capas que no me interesan, excepto una, de forma automática a través de VBA. ¿Alguien tendría alguna idea para la macro? Soy novato.

Les agradezco de antemano,

Configuración: Windows 7 / Internet Explorer 9.0

2 respuestas

  1. Baloo
     
    Hola,

    para aislar una capa se utiliza el comando ISOLCALQUE
    a la inversa, el comando ASSOCIERCALQUE restaura las capas ocultas con ISOLCALQUE.

    estos comandos son accesibles a través de las barras de herramientas

    por lo tanto, en principio no es necesario macros.
    0
  2. fabdu91630 Mensajes publicados 22 Fecha de registro   Estado Miembro Última intervención  
     
    Esta macro permite congelar todas las capas excepto aquellas que necesitamos:
    Sub CongelarTodasLasCapasExceptoDos()
    Dim capa As AcadLayer

    'Recorrer todas las capas en la colección Capas del dibujo:
    For Each capa In ThisDrawing.Layers
    'Si el nombre de la capa no es igual al nombre de las capas que no queremos congelar:
    If capa.Name <> "Nombre capa 1" And capa.Name <> "Nombre capa 2" Then
    'Congelar la capa excepto la capa 0 que no se puede congelar
    If capa.Name <> "0" Then capa.Freeze = True
    End If
    Next
    End Sub
    0