VB.net中合併word中的表格

軟帝國產品的互兼容性使得咱們採用vb.net編程語言操做Microsoft Word文檔變得至關容易。針對本文的主題，網絡上已經有不少大牛博客作了詳細的介紹，基本的我就再也不贅述，只是本身在作項目的時候須要用到合併單元格的操做，一時難以在網上找到準確的答案，現在終於琢磨出來，遂決定跟你們分享一下個人經驗，省得後來者再走彎路。

一、建立表格：

1 Imports MSWord = Microsoft.Office.Interop.Word  
2 Dim table1 As MSWord.Table = wordDoc.Tables.Add(wordDoc.Paragraphs.Last.Range, 7, 4, Missing.Value)  

二、合併單元格：

1 table.Cell(2, 1).Select()'選中第一個單元格  
2 wordDoc.Application.Selection.MoveDown(5, 5, 1)'移動到第六行，中間的5表明移動的行數  
3 wordDoc.Application.Selection.Cells.Merge()'執行合併操做  
4 wordDoc.Application.Selection.Range.Text = "合併"'合併後的單元格賦值  

以上代碼的意思就是，選中表格的第一列中從第二行到第6行的單元格，將其合併，並將合併後的單元格的內容賦值爲：「合併」。

 三、添加圖片：

wordDoc.InlineShapes.AddPicture(Application.StartupPath + "\_gan_" + i1.ToString + ".Png", False, True, wordDoc.Paragraphs.Last.Range)