C#操作Word的超詳細總結

創建Word;

插入文字,選擇文字,編輯文字的字號、粗細、顏色、下劃線等;

設置段落的首行縮進、行距;

設置頁面頁邊距和紙張大小;

設置頁眉、頁碼;

插入圖片,設置圖片寬高以及給圖片添加標題;

插入表格,格式化表格,往表格中插入數據;

保存Word,打印Word;

重新打開Word等。

 

Visual studio版本:Visual Studio 2012(2010應該也可以)

 

準備工作:

/* 
1. 添加引用COM裏面的 Microsoft Word 12.0 Object. Library 引用(12.0表示Word 2007版本)

2. 導命名空間

using MSWord =Microsoft.Office.Interop.Word;
using System.IO;
using System.Reflection;

3. 把引用中的Microsoft.Office.Interop.Word的“屬性”中的嵌入互操作設爲False
*/

 

以下是全部代碼:

  1 using System;
  2 using System.Collections.Generic;
  3 using System.Linq;
  4 using System.Runtime.InteropServices;
  5 using System.Text;
  6 using MSWord = Microsoft.Office.Interop.Word;
  7 using System.IO;
  8 using System.Reflection;
  9 
 10 namespace Console_WordSkill_All
 11 {
 12     class Program
 13     {
 14         static void Main(string[] args)
 15         {
 16             object path;                              //文件路徑變量
 17             string strContent;                        //文本內容變量
 18             MSWord.Application wordApp;                   //Word應用程序變量 
 19             MSWord.Document wordDoc;                  //Word文檔變量
 20             
 21             path = Environment.CurrentDirectory + "\\MyWord_Print.doc";
 22             wordApp = new MSWord.ApplicationClass(); //初始化
 23 
 24             wordApp.Visible = true;//使文檔可見
 25 
 26             //如果已存在,則刪除
 27             if (File.Exists((string)path))
 28             {
 29                 File.Delete((string)path);
 30             }
 31 
 32             //由於使用的是COM庫,因此有許多變量需要用Missing.Value代替
 33             Object Nothing = Missing.Value;
 34             wordDoc = wordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);
 35 
 36             #region 頁面設置、頁眉圖片和文字設置,最後跳出頁眉設置
 37 
 38             //頁面設置
 39             wordDoc.PageSetup.PaperSize = MSWord.WdPaperSize.wdPaperA4;//設置紙張樣式爲A4紙
 40             wordDoc.PageSetup.Orientation = MSWord.WdOrientation.wdOrientPortrait;//排列方式爲垂直方向
 41             wordDoc.PageSetup.TopMargin = 57.0f;
 42             wordDoc.PageSetup.BottomMargin = 57.0f;
 43             wordDoc.PageSetup.LeftMargin = 57.0f;
 44             wordDoc.PageSetup.RightMargin = 57.0f;
 45             wordDoc.PageSetup.HeaderDistance = 30.0f;//頁眉位置
 46 
 47             //設置頁眉
 48             wordApp.ActiveWindow.View.Type = MSWord.WdViewType.wdNormalView;//普通視圖(即頁面視圖)樣式
 49             wordApp.ActiveWindow.View.SeekView = MSWord.WdSeekView.wdSeekPrimaryHeader;//進入頁眉設置,其中頁眉邊距在頁面設置中已完成
 50             wordApp.Selection.ParagraphFormat.Alignment = MSWord.WdParagraphAlignment.wdAlignParagraphRight;//頁眉中的文字右對齊
 51 
 52 
 53             //插入頁眉圖片(測試結果圖片未插入成功)
 54             wordApp.Selection.ParagraphFormat.Alignment = MSWord.WdParagraphAlignment.wdAlignParagraphCenter;
 55             string headerfile = @"C:\Users\xiahui\Desktop\OficeProgram\3.jpg";
 56             MSWord.InlineShape shape1 = wordApp.ActiveWindow.ActivePane.Selection.InlineShapes.AddPicture(headerfile, ref Nothing, ref Nothing, ref Nothing);
 57             shape1.Height = 5;//強行設置貌似無效,圖片沒有按設置的縮放——圖片的比例並沒有改變。
 58             shape1.Width = 20;
 59             wordApp.ActiveWindow.ActivePane.Selection.InsertAfter("  文檔頁眉");//在頁眉的圖片後面追加幾個字
 60             
 61             //去掉頁眉的橫線
 62             wordApp.ActiveWindow.ActivePane.Selection.ParagraphFormat.Borders[MSWord.WdBorderType.wdBorderBottom].LineStyle = MSWord.WdLineStyle.wdLineStyleNone;
 63             wordApp.ActiveWindow.ActivePane.Selection.Borders[MSWord.WdBorderType.wdBorderBottom].Visible = false;
 64             wordApp.ActiveWindow.ActivePane.View.SeekView = MSWord.WdSeekView.wdSeekMainDocument;//退出頁眉設置
 65             #endregion
 66 
 67             #region 頁碼設置並添加頁碼
 68 
 69             //爲當前頁添加頁碼
 70             MSWord.PageNumbers pns = wordApp.Selection.Sections[1].Headers[MSWord.WdHeaderFooterIndex.wdHeaderFooterEvenPages].PageNumbers;//獲取當前頁的號碼
 71             pns.NumberStyle = MSWord.WdPageNumberStyle.wdPageNumberStyleNumberInDash;//設置頁碼的風格,是Dash形還是圓形的
 72             pns.HeadingLevelForChapter = 0;
 73             pns.IncludeChapterNumber = false;
 74             pns.RestartNumberingAtSection = false;
 75             pns.StartingNumber = 0; //開始頁頁碼?
 76             object pagenmbetal = MSWord.WdPageNumberAlignment.wdAlignPageNumberCenter;//將號碼設置在中間
 77             object first = true;
 78             wordApp.Selection.Sections[1].Footers[MSWord.WdHeaderFooterIndex.wdHeaderFooterEvenPages].PageNumbers.Add(ref pagenmbetal, ref first);
 79 
 80             #endregion
 81 
 82             #region 行間距與縮進、文本字體、字號、加粗、斜體、顏色、下劃線、下劃線顏色設置
 83 
 84             wordApp.Selection.ParagraphFormat.LineSpacing = 16f;//設置文檔的行間距
 85             wordApp.Selection.ParagraphFormat.FirstLineIndent = 30;//首行縮進的長度
 86             //寫入普通文本
 87             strContent = "我是普通文本\n";
 88             wordDoc.Paragraphs.Last.Range.Text = strContent;
 89 
 90             wordDoc.Paragraphs.Last.Range.Text = "我再加一行試試,這裏不加‘\\n‘";
 91             //直接添加段,不是覆蓋( += )
 92             wordDoc.Paragraphs.Last.Range.Text += "不會覆蓋的,";
 93 
 94             //添加在此段的文字後面,不是新段落
 95             wordDoc.Paragraphs.Last.Range.InsertAfter("這是後面的內容\n");
 96 
 97             //將文檔的前4個字替換成"哥是替換文字",並將其顏色設爲紅色
 98             object start = 0;
 99             object end = 4;
100             MSWord.Range rang = wordDoc.Range(ref start, ref end);
101             rang.Font.Color = MSWord.WdColor.wdColorRed;
102             rang.Text = "哥是替換文字";
103             wordDoc.Range(ref start, ref end);
104 
105             //寫入黑體文本
106             object unite = MSWord.WdUnits.wdStory;
107             wordApp.Selection.EndKey(ref unite, ref Nothing);//將光標移到文本末尾
108             wordApp.Selection.ParagraphFormat.FirstLineIndent = 0;//取消首行縮進的長度
109             strContent = "這是黑體文本\n";
110             wordDoc.Paragraphs.Last.Range.Font.Name = "黑體";
111             wordDoc.Paragraphs.Last.Range.Text = strContent;
112 
113             //寫入加粗文本
114             strContent = "這是粗體文本\n"; //
115             wordApp.Selection.EndKey(ref unite, ref Nothing);//這一句不加,有時候好像也不出問題,不過還是加了安全
116             wordDoc.Paragraphs.Last.Range.Font.Bold = 1;
117             wordDoc.Paragraphs.Last.Range.Text = strContent;
118 
119             //寫入15號字體文本
120             strContent = "我這個文本的字號是15號,而且是宋體\n";
121             wordApp.Selection.EndKey(ref unite, ref Nothing);
122             wordDoc.Paragraphs.Last.Range.Font.Size = 15;
123             wordDoc.Paragraphs.Last.Range.Font.Name = "宋體";
124             wordDoc.Paragraphs.Last.Range.Text = strContent;
125 
126             //寫入斜體文本
127             strContent = "我是斜體字文本\n";
128             wordApp.Selection.EndKey(ref unite, ref Nothing);
129             wordDoc.Paragraphs.Last.Range.Font.Italic = 1;
130             wordDoc.Paragraphs.Last.Range.Text = strContent;
131 
132             //寫入藍色文本
133             strContent = "我是藍色的文本\n";
134             wordApp.Selection.EndKey(ref unite, ref Nothing);
135             wordDoc.Paragraphs.Last.Range.Font.Color = MSWord.WdColor.wdColorBlue;
136             wordDoc.Paragraphs.Last.Range.Text = strContent;
137 
138             //寫入下劃線文本
139             strContent = "我是下劃線文本\n";
140             wordApp.Selection.EndKey(ref unite, ref Nothing);
141             wordDoc.Paragraphs.Last.Range.Font.Underline = MSWord.WdUnderline.wdUnderlineThick;
142             wordDoc.Paragraphs.Last.Range.Text = strContent;
143 
144             //寫入紅色下畫線文本
145             strContent = "我是點線下劃線,並且下劃線是紅色的\n";
146             wordApp.Selection.EndKey(ref unite, ref Nothing);
147             wordDoc.Paragraphs.Last.Range.Font.Underline = MSWord.WdUnderline.wdUnderlineDottedHeavy;
148             wordDoc.Paragraphs.Last.Range.Font.UnderlineColor = MSWord.WdColor.wdColorRed;
149             wordDoc.Paragraphs.Last.Range.Text = strContent;
150 
151             //取消下劃線,並且將字號調整爲12號
152             strContent = "我他媽不要下劃線了,並且設置字號爲12號,黑色不要斜體\n";
153             wordApp.Selection.EndKey(ref unite, ref Nothing);
154             wordDoc.Paragraphs.Last.Range.Font.Size = 12;
155             wordDoc.Paragraphs.Last.Range.Font.Underline = MSWord.WdUnderline.wdUnderlineNone;
156             wordDoc.Paragraphs.Last.Range.Font.Color = MSWord.WdColor.wdColorBlack;
157             wordDoc.Paragraphs.Last.Range.Font.Italic = 0;
158             wordDoc.Paragraphs.Last.Range.Text = strContent;
159             
160 
161             #endregion
162 
163 
164             #region 插入圖片、居中顯示,設置圖片的絕對尺寸和縮放尺寸,並給圖片添加標題
165 
166             wordApp.Selection.EndKey(ref unite, ref Nothing); //將光標移動到文檔末尾
167             //圖片文件的路徑
168             string filename = Environment.CurrentDirectory + "\\6.jpg";
169             //要向Word文檔中插入圖片的位置
170             Object range = wordDoc.Paragraphs.Last.Range;
171             //定義該插入的圖片是否爲外部鏈接
172             Object linkToFile = false;               //默認,這裏貌似設置爲bool類型更清晰一些
173             //定義要插入的圖片是否隨Word文檔一起保存
174             Object saveWithDocument = true;              //默認
175             //使用InlineShapes.AddPicture方法(【即“嵌入型”】)插入圖片
176             wordDoc.InlineShapes.AddPicture(filename, ref linkToFile, ref saveWithDocument, ref range);
177             wordApp.Selection.ParagraphFormat.Alignment = MSWord.WdParagraphAlignment.wdAlignParagraphCenter;//居中顯示圖片
178 
179             //設置圖片寬高的絕對大小
180 
181             //wordDoc.InlineShapes[1].Width = 200;
182             //wordDoc.InlineShapes[1].Height = 150;
183             //按比例縮放大小
184 
185             wordDoc.InlineShapes[1].ScaleWidth = 20;//縮小到20% ?
186             wordDoc.InlineShapes[1].ScaleHeight = 20;
187 
188             //在圖下方居中添加圖片標題
189 
190             wordDoc.Content.InsertAfter("\n");//這一句與下一句的順序不能顛倒,原因還沒搞透
191             wordApp.Selection.EndKey(ref unite, ref Nothing);          
192             wordApp.Selection.ParagraphFormat.Alignment = MSWord.WdParagraphAlignment.wdAlignParagraphCenter;
193             wordApp.Selection.Font.Size = 10;//字體大小
194             wordApp.Selection.TypeText("圖1 測試圖片\n");
195 
196             #endregion
197 
198             #region 添加表格、填充數據、設置表格行列寬高、合併單元格、添加表頭斜線、給單元格添加圖片
199             wordDoc.Content.InsertAfter("\n");//這一句與下一句的順序不能顛倒,原因還沒搞透
200             wordApp.Selection.EndKey(ref unite, ref Nothing); //將光標移動到文檔末尾
201             wordApp.Selection.ParagraphFormat.Alignment = MSWord.WdParagraphAlignment.wdAlignParagraphLeft;
202             //object WdLine2 = MSWord.WdUnits.wdLine;//換一行;  
203             //wordApp.Selection.MoveDown(ref WdLine2, 6, ref Nothing);//向下跨15行輸入表格,這樣表格就在文字下方了,不過這是非主流的方法
204 
205             //設置表格的行數和列數
206             int tableRow = 6;
207             int tableColumn = 6;
208 
209             //定義一個Word中的表格對象
210             MSWord.Table table = wordDoc.Tables.Add(wordApp.Selection.Range,
211             tableRow, tableColumn, ref Nothing, ref Nothing);
212 
213             //默認創建的表格沒有邊框,這裏修改其屬性,使得創建的表格帶有邊框 
214             table.Borders.Enable = 1;//這個值可以設置得很大,例如5、13等等
215 
216             //表格的索引是從1開始的。
217             wordDoc.Tables[1].Cell(1, 1).Range.Text = "列\n行";
218             for (int i = 1; i < tableRow; i++)
219             {
220                 for (int j = 1; j < tableColumn; j++)
221                 {
222                     if (i == 1)
223                     {
224                         table.Cell(i, j + 1).Range.Text = "Column " + j;//填充每列的標題
225                     }
226                     if (j == 1)
227                     {
228                         table.Cell(i + 1, j).Range.Text = "Row " + i; //填充每行的標題
229                     }
230                     table.Cell(i + 1, j + 1).Range.Text = i + "" + j + "";  //填充表格的各個小格子
231                 }
232             }
233 
234 
235             //添加行
236             table.Rows.Add(ref Nothing);
237             table.Rows[tableRow + 1].Height = 35;//設置新增加的這行表格的高度
238             //向新添加的行的單元格中添加圖片
239             string FileName = Environment.CurrentDirectory + "\\6.jpg";//圖片所在路徑
240             object LinkToFile = false;
241             object SaveWithDocument = true;
242             object Anchor = table.Cell(tableRow + 1, tableColumn).Range;//選中要添加圖片的單元格
243             wordDoc.Application.ActiveDocument.InlineShapes.AddPicture(FileName, ref LinkToFile, ref SaveWithDocument, ref Anchor);
244 
245             //由於是本文檔的第2張圖,所以這裏是InlineShapes[2]
246             wordDoc.Application.ActiveDocument.InlineShapes[2].Width = 50;//圖片寬度
247             wordDoc.Application.ActiveDocument.InlineShapes[2].Height = 35;//圖片高度
248             
249             // 將圖片設置爲四周環繞型
250             MSWord.Shape s = wordDoc.Application.ActiveDocument.InlineShapes[2].ConvertToShape();
251             s.WrapFormat.Type = MSWord.WdWrapType.wdWrapSquare;
252 
253 
254             //設置table樣式
255             table.Rows.HeightRule = MSWord.WdRowHeightRule.wdRowHeightAtLeast;//高度規則是:行高有最低值下限?
256             table.Rows.Height = wordApp.CentimetersToPoints(float.Parse("0.8"));// 
257 
258             table.Range.Font.Size = 10.5F;
259             table.Range.Font.Bold = 0;
260 
261             table.Range.ParagraphFormat.Alignment = MSWord.WdParagraphAlignment.wdAlignParagraphCenter;//表格文本居中
262             table.Range.Cells.VerticalAlignment = MSWord.WdCellVerticalAlignment.wdCellAlignVerticalBottom;//文本垂直貼到底部
263             //設置table邊框樣式
264             table.Borders.OutsideLineStyle = MSWord.WdLineStyle.wdLineStyleDouble;//表格外框是雙線
265             table.Borders.InsideLineStyle = MSWord.WdLineStyle.wdLineStyleSingle;//表格內框是單線
266 
267             table.Rows[1].Range.Font.Bold = 1;//加粗
268             table.Rows[1].Range.Font.Size = 12F;
269             table.Cell(1, 1).Range.Font.Size = 10.5F;
270             wordApp.Selection.Cells.Height = 30;//所有單元格的高度
271 
272             //除第一行外,其他行的行高都設置爲20
273             for (int i = 2; i <= tableRow; i++)
274             {
275                 table.Rows[i].Height = 20;
276             }
277 
278             //將表格左上角的單元格里的文字(“行” 和 “列”)居右
279             table.Cell(1, 1).Range.ParagraphFormat.Alignment = MSWord.WdParagraphAlignment.wdAlignParagraphRight;
280             //將表格左上角的單元格里面下面的“列”字移到左邊,相比上一行就是將ParagraphFormat改成了Paragraphs[2].Format
281             table.Cell(1, 1).Range.Paragraphs[2].Format.Alignment = MSWord.WdParagraphAlignment.wdAlignParagraphLeft;
282 
283             table.Columns[1].Width = 50;//將第 1列寬度設置爲50
284 
285             //將其他列的寬度都設置爲75
286             for (int i = 2; i <= tableColumn; i++)
287             {
288                 table.Columns[i].Width = 75;
289             }
290 
291 
292             //添加表頭斜線,並設置表頭的樣式
293             table.Cell(1, 1).Borders[MSWord.WdBorderType.wdBorderDiagonalDown].Visible = true;
294             table.Cell(1, 1).Borders[MSWord.WdBorderType.wdBorderDiagonalDown].Color = MSWord.WdColor.wdColorRed;
295             table.Cell(1, 1).Borders[MSWord.WdBorderType.wdBorderDiagonalDown].LineWidth = MSWord.WdLineWidth.wdLineWidth150pt;
296 
297             //合併單元格
298             table.Cell(4, 4).Merge(table.Cell(4, 5));//橫向合併
299 
300             table.Cell(2, 3).Merge(table.Cell(4, 3));//縱向合併,合併(2,3),(3,3),(4,3)
301 
302             #endregion
303 
304             wordApp.Selection.EndKey(ref unite, ref Nothing); //將光標移動到文檔末尾
305 
306             wordDoc.Content.InsertAfter("\n");
307             wordDoc.Content.InsertAfter("就寫這麼多,算了吧!2016.09.27");
308             
309 
310 
311             //WdSaveFormat爲Word 2003文檔的保存格式
312             object format = MSWord.WdSaveFormat.wdFormatDocument;// office 2007就是wdFormatDocumentDefault
313             //將wordDoc文檔對象的內容保存爲DOCX文檔
314             wordDoc.SaveAs(ref path, ref format, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing);
315             //關閉wordDoc文檔對象
316 
317             //看是不是要打印
318             //wordDoc.PrintOut();
319 
320 
321 
322             wordDoc.Close(ref Nothing, ref Nothing, ref Nothing);
323             //關閉wordApp組件對象
324             wordApp.Quit(ref Nothing, ref Nothing, ref Nothing);
325             Console.WriteLine(path + " 創建完畢!");
326             Console.ReadKey();
327 
328 
329             //我還要打開這個文檔玩玩
330             MSWord.Application app = new MSWord.Application();
331             MSWord.Document doc = null;
332             try
333             {
334                 
335                 object unknow = Type.Missing;
336                 app.Visible = true;
337                 string str = Environment.CurrentDirectory + "\\MyWord_Print.doc";
338                 object file = str;
339                 doc = app.Documents.Open(ref file,
340                     ref unknow, ref unknow, ref unknow, ref unknow,
341                     ref unknow, ref unknow, ref unknow, ref unknow,
342                     ref unknow, ref unknow, ref unknow, ref unknow,
343                     ref unknow, ref unknow, ref unknow);
344                 string temp = doc.Paragraphs[1].Range.Text.Trim();
345                 Console.WriteLine("你他媽輸出temp幹嘛?");
346             }
347             catch (Exception ex)
348             {
349                 Console.WriteLine(ex.Message);
350             }
351             wordDoc = doc;
352             wordDoc.Paragraphs.Last.Range.Text += "我真的不打算再寫了,就寫這麼多吧";
353 
354             Console.ReadKey();
355         }
356 
357     }
358 }

 

生成編輯的Word內容如下圖所示:

技術分享


轉載自http://www.mamicode.com/info-detail-1552039.html

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章