如何使用C#建立CAD与Excel之间“datalink”数据

xxchemkin

论坛已有建立CAD与Excel之间“datalink”数据方法的代码，但是现在链接整个Excel工作表，如何实现链接工作表区域，比如工作表“A1：H7”区域。有没有大神给改一下，指点迷津，不胜感激。



using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.Runtime;
using Autodesk.AutoCAD.Windows;

namespace LinkToExcel
{
  public class Commands
  {
    [CommandMethod("TFS")]
    static public void TableFromSpreadsheet()
    {
      // Hardcoding the string
      // Could also select for it
      const string dlName =
        "Import table from Excel demo";

      Document doc =
        Application.DocumentManager.MdiActiveDocument;
      Database db = doc.Database;
      Editor ed = doc.Editor;

      OpenFileDialog ofd =
        new OpenFileDialog(
          "Select Excel spreadsheet to link",
          null,
          "xls; xlsx",
          "ExcelFileToLink",
          OpenFileDialog.OpenFileDialogFlags.
            DoNotTransferRemoteFiles
        );

      System.Windows.Forms.DialogResult dr =
        ofd.ShowDialog();

      if (dr != System.Windows.Forms.DialogResult.OK)
        return;

      ed.WriteMessage(
        "\nFile selected was \"{0}\".",
        ofd.Filename
      );

      PromptPointResult ppr =
        ed.GetPoint(
          "\nEnter table insertion point: "
        );
      if (ppr.Status != PromptStatus.OK)
        return;

      // Remove the Data Link, if it exists already

      DataLinkManager dlm = db.DataLinkManager;
      ObjectId dlId = dlm.GetDataLink(dlName);
      if (dlId != ObjectId.Null)
      {
        dlm.RemoveDataLink(dlId);
      }

      // Create and add the Data Link

      DataLink dl = new DataLink();
      dl.DataAdapterId = "AcExcel";
      dl.Name = dlName;
      dl.Description =
        "Excel fun with Through the Interface";
      dl.ConnectionString = ofd.Filename;
      dl.DataLinkOption =
        DataLinkOption.PersistCache;
      dl.UpdateOption |=
        (int)UpdateOption.AllowSourceUpdate;

      dlId = dlm.AddDataLink(dl);

      Transaction tr =
        doc.TransactionManager.StartTransaction();
      using (tr)
      {
        tr.AddNewlyCreatedDBObject(dl, true);

        BlockTable bt =
          (BlockTable)tr.GetObject(
            db.BlockTableId,
            OpenMode.ForRead
          );

        Table tb = new Table();
        tb.TableStyle = db.Tablestyle;
        tb.Position = ppr.Value;
        tb.SetDataLink(0, 0, dlId, true);
        tb.GenerateLayout();

        BlockTableRecord btr =
          (BlockTableRecord)tr.GetObject(
            db.CurrentSpaceId,
            OpenMode.ForWrite
          );

        btr.AppendEntity(tb);
        tr.AddNewlyCreatedDBObject(tb, true);
        tr.Commit();
      }

      // Force a regen to display the table
      ed.Regen();
    }
  }
}