AUTOCAD Congelar planos en VBA
Resuelto
fabdu91630
-
fabdu91630 Mensajes publicados 22 Fecha de registro Estado Miembro Última intervención -
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
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
-
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. -
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