C# AutoCAD选中块获取其位置替换为外部选择的块，其他位置相同的块保留原块不替换为新块

您可以使用以下代码来实现在AutoCAD中选中一个块并将其替换为外部选择的块，同时保留其他位置相同的块不替换为新块：

using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.Geometry;

public void ReplaceBlock()
{
    // 获取当前文档和编辑器对象
    Document doc = Application.DocumentManager.MdiActiveDocument;
    Editor ed = doc.Editor;

    // 提示用户选择要替换的块
    PromptEntityOptions peo = new PromptEntityOptions("\n选择要替换的块：");
    peo.SetRejectMessage("\n请选择一个块！");
    peo.AddAllowedClass(typeof(BlockReference), true);
    PromptEntityResult per = ed.GetEntity(peo);

    if (per.Status == PromptStatus.OK)
    {
        // 获取用户选择的块的位置和名称
        BlockReference br = (BlockReference)doc.Editor.GetObject(per.ObjectId, OpenMode.ForWrite);
        Point3d position = br.Position;
        string blockName = br.Name;

        // 提示用户选择要替换成的块
        PromptEntityOptions peo2 = new PromptEntityOptions("\n选择要替换成的块：");
        peo2.SetRejectMessage("\n请选择一个块！");
        peo2.AddAllowedClass(typeof(BlockReference), true);
        PromptEntityResult per2 = ed.GetEntity(peo2);

        if (per2.Status == PromptStatus.OK)
        {
            // 获取用户选择的块的名称
            BlockReference br2 = (BlockReference)doc.Editor.GetObject(per2.ObjectId, OpenMode.ForRead);
            string blockName2 = br2.Name;

            // 循环遍历当前布局中的块，并替换相同名称的块
            using (Transaction tr = doc.TransactionManager.StartTransaction())
            {
                BlockTableRecord btr = (BlockTableRecord)tr.GetObject(doc.Database.CurrentSpaceId, OpenMode.ForWrite);
                foreach (ObjectId id in btr)
                {
                    Entity ent = tr.GetObject(id, OpenMode.ForRead) as Entity;
                    if (ent != null && ent is BlockReference && ent.GetType().Name == "BlockReference")
                    {
                        BlockReference blkRef = (BlockReference)ent;
                        if (blkRef.Name == blockName && blkRef.Position == position && blkRef.ObjectId != br.ObjectId)
                        {
                            blkRef.UpgradeOpen();
                            blkRef.BlockTableRecord = br2.BlockTableRecord;
                            blkRef.DowngradeOpen();
                        }
                    }
                }
                tr.Commit();
            }
            ed.WriteMessage("\n已成功替换块！");
        }
    }
}

这段代码首先提示用户选择要替换的块，然后获取该块的位置和名称。接下来，它再次提示用户选择要替换成的块，并获取其名称。最后，它循环遍历当前布局中的块，并替换名称相同、位置相同但不是用户选择的块的所有块。

请注意，这段代码只能替换当前布局中的块，如果您想要替换整个图纸中的块，您需要修改代码以遍历所有布局并替换其中的块。