[表格] 求教：如何合并单元格

admin

1. using Autodesk.AutoCAD.ApplicationServices;
   
2. 
   
3. using Autodesk.AutoCAD.DatabaseServices;
   
4. 
   
5. using Autodesk.AutoCAD.EditorInput;
   
6. 
   
7. using Autodesk.AutoCAD.Runtime;
   
8. 
   
9. 
   
10. 
    
11. namespace TableStyleEditing
    
12. 
    
13. {
    
14. 
    
15.   public class Commands
    
16. 
    
17.   {
    
18. 
    
19.     [CommandMethod("UTT")]
    
20. 
    
21.     public void UnmergeTableTitle()
    
22. 
    
23.     {
    
24. 
    
25.       var doc = Application.DocumentManager.MdiActiveDocument;
    
26. 
    
27.       if (doc == null) return;
    
28. 
    
29.       var ed = doc.Editor;
    
30. 
    
31. 
    
32. 
    
33.       // Select a table
    
34. 
    
35. 
    
36. 
    
37.       var peo = new PromptEntityOptions("\nSelect table");
    
38. 
    
39.       peo.SetRejectMessage("\nMust be a table.");
    
40. 
    
41.       peo.AddAllowedClass(typeof(Table), false);
    
42. 
    
43.       var per = ed.GetEntity(peo);
    
44. 
    
45.       if (per.Status != PromptStatus.OK)
    
46. 
    
47.         return;
    
48. 
    
49. 
    
50. 
    
51.       using (var tr = doc.TransactionManager.StartTransaction())
    
52. 
    
53.       {
    
54. 
    
55.         var table = tr.GetObject(per.ObjectId, OpenMode.ForWrite) as Table;
    
56. 
    
57.         if (table != null)
    
58. 
    
59.         {
    
60. 
    
61.           // Get the first row
    
62. 
    
63. 
    
64. 
    
65.           var row = table.Rows[0];
    
66. 
    
67. 
    
68. 
    
69.           // If it is merged, unmerge it
    
70. 
    
71. 
    
72. 
    
73.           if (row.IsMerged.HasValue && row.IsMerged.Value)
    
74. 
    
75.           {
    
76. 
    
77.             table.UnmergeCells(row);
    
78. 
    
79.             ed.WriteMessage("\nUnmerged first row.");
    
80. 
    
81.           }
    
82. 
    
83.           else
    
84. 
    
85.           {
    
86. 
    
87.             ed.WriteMessage("\nFirst row is not merged.");
    
88. 
    
89.           }
    
90. 
    
91.         }
    
92. 
    
93.         tr.Commit();
    
94. 
    
95.       }
    
96. 
    
97.     }
    
98. 
    
99.   }
    
100. 
     
101. }

复制代码