Set attribute value for windowed objects

You can do this via code. Maybe someone can translate this to Lisp

import traceback
from pyrx_imp import Ap, Db, Ed, Ge, Gi, Gs, Rx

print("added command = changeatt")

def PyRxCmd_changeatt():
    try:
        filter = [(Db.DxfCode.kDxfStart, "INSERT")]
        ps, ss = Ed.Editor.select(filter)
        refs = [Db.BlockReference(id) for id in ss.objectIds()]
        atts = [Db.AttributeReference(id) for ref in refs for id in ref.attributeIds()]
        for att in atts:
            if att.tag() == "BOXTYPE":
                att.upgradeOpen()
                att.setTextString("WOOHOO YES!")
    except Exception as err:
        traceback.print_exception(err)

If you can figure out how to install python

Here’s a sample sledge hammer approach, that will change every attribute in a folder of .DWGs

https://github.com/CEXT-Dan/PyRx

import traceback
from pyrx_imp import Rx, Ge, Gs, Gi, Db, Ap, Ed

import wx
import os, pathlib

def changeit(db : Db.Database, tagValue, textValue):
    ids = db.objectIds(Db.AttributeReference.desc())
    for att in [Db.AttributeReference(id) for id in ids]:
        if att.tag() == tagValue:
            att.upgradeOpen()
            att.setTextString(textValue)

def openSideDrawing(path, tagValue,textValue):
    print("\nProcessing {} ".format(path))
    db = Db.Database(False, True)
    db.readDwgFile(path)
    db.closeInput(True)
    changeit(db,tagValue,textValue)
    db.saveAs(path)
            
def PyRxCmd_doit():
    try:
        tagName = 'FGUIDE'
        textValue = 'WOOHOO YES!'
        dwgext = ".dwg".casefold()

        dlg = wx.DirDialog(None, "Choose input directory","",
                wx.DD_DEFAULT_STYLE | wx.DD_DIR_MUST_EXIST)
    
        if dlg.ShowModal() != wx.ID_OK:
            print("You Cancelled The Dialog!")
            return

        for fname in next(os.walk(dlg.GetPath()), (None, None, []))[2]:
            ext = pathlib.Path(fname).suffix.casefold()
            if ext != dwgext:
                continue
            fpath = '{}\\{}'.format(dlg.GetPath(),fname)
            openSideDrawing(fpath, tagName,textValue)
        print("yay")
    except Exception as err:
        traceback.print_exception(err)

You don't need necessarily need a program to do this.

You could select the blocks, then simply modify the attribute value from the Properties panel.

Alternatively, you could use the FIND command to find and replace attribute values from selected blocks.

I think the forum has mucked up the formatting. Try the attached