Bloqueo y desbloqueo de capas

Inutilización y reutilización de capas

Trabajar con capas

Asignación de color a una capa

 

Manual del desarrollador de ActiveX y VBA > Creación y edición de entidades de AutoCAD > Uso de capas, colores y tipos de línea >  Trabajar con capas > 

Bloqueo y desbloqueo de capas

Los objetos dispuestos en una capa bloqueada no pueden editarse, pero permanecen visibles si la capa está activada y no está inutilizada. También es posible convertir en actual una capa bloqueada y añadirle objetos. Se puede inutilizar y desactivar capas bloqueadas así como cambiar sus propiedades asociadas de color y tipos de línea.

Para bloquear o desbloquear una capa, utilice la propiedad Lock. Si introduce un valor de TRUE en esta propiedad, la capa se bloquea. Si le asigna el valor FALSE, la capa se desbloquea.

Sub Ch4_LayerLock()

    ' Create a new layer called "ABC"

    Dim layerObj As AcadLayer

    Set layerObj = ThisDrawing.Layers.Add("ABC")

      
    ' Lock layer "ABC"
      
    layerObj.Lock = True
      
End Sub