http://www.zwsoft.com/forum/viewthread.php?tid=2288 (defun C:LFD () (vl-Load-Com) (vl-Catch-All-Apply '(lambda () (vla-Remove (vla-GetExtensionDictionary (vla-Get-Layers (vla-Get-ActiveDocument (vlax-Get-Acad-Object)))) "ACAD_LAYERFILTERS"))) (princ "\nAll layer filters have been deleted.") (princ) ) this layer filter delete lisp do not decrease size as autocad Is VL still not included AhmedF1226 2012-07-12 13:12:40