Bonjour,
Plus besoin d'AutoLISP pour changer les éléments et les Blocks du dessin en ByBlock, il suffit de taper dans Command: SETBYLAYER
cette command exist depuis le version 2008.