C#操作Word（開啟建立,選擇複製,寫入資料,儲存關閉）

阿新 • • 發佈：2019-02-16

(1)必要變數（欄位）定義

 private object Nothing = Missing.Value;//預設值
 private object IsReadOnly = false;//不僅僅可讀
 private MSWord._Application wordApp;//Word應用程式
 private MSWord._Document wordDoc;//Word文件
 private int tableCount;//Word表格數目(完整的)
 注：前面4個是操作Word時，必須定義的欄位；最後一個適應本程式

(2)讀取txt資料

//原始資料讀取
        private 
 List<string> TextData = new List<string>();//文字資料（去除41000……）
        private void toolStripMenuItem1_Click(object sender, EventArgs e)
        {
            openFileDialog1.InitialDirectory = "E:\\";
            openFileDialog1.Filter = "GSI(*.gsi)|*.gsi";
            if(openFileDialog1.ShowDialog()==DialogResult.OK)
            {
                TextData = File.ReadAllLines(openFileDialog1.FileName).Where(s => (s[0 
] != '4') && (s != "")).ToList();
            }
            tableCount = (int)(TextData.Count / 11 * 2 / 7);
            MessageBox.Show("共讀取" + TextData.Count / 11 + "測段的資料！");
        }

(3)開啟原本的Word文件，並複製其中的表格

//載入水準簿(並進行表格複製)
        private void toolStripMenuItem2_Click(object sender, EventArgs e)
        {
            openFileDialog2.InitialDirectory = "e:\\" 
;
            openFileDialog2.Filter = "文件(*.docx)|*.docx|(*.doc)|*.doc";
            if(openFileDialog2.ShowDialog()==DialogResult.OK)
            {
                try
                {
                    foreach (Process item in Process.GetProcessesByName("WINWORD"))
                    { item.Kill(); }//如存在開啟的Word則先關閉(一個應用程式例項就是程序)
                    object filePath=openFileDialog2.FileName;
                    wordApp = new MSWord.Application(); //應用程式例項化
                    //wordApp.Visible = true;//可見(用的是wordApp顯示)
                    wordDoc = wordApp.Documents.Open(ref filePath, ref Nothing, ref IsReadOnly, 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);

                    wordDoc.Tables[1].Select();//選擇與複製：文件用Sections[節]/應用程式用Selection[選擇]
                    wordApp.Selection.Copy();
                    //////還可以是：（會複製文件第一部分所有內容--包括標題）
                    //wordDoc.Select();
                    //wordDoc.Sections[1].Range.Copy();
                    //wordDoc.Sections[1].Range.InsertBreak(ref myType); //以頁為單元,表格連續(只複製表格)
                    //wordDoc.Sections[1].Range.PasteAndFormat(MSWord.WdRecoveryType.wdPasteDefaul);//複製語句：文件形式

                    object myType = MSWord.WdBreakType.wdSectionBreakContinuous;//換行符
                    object myUnit = MSWord.WdUnits.wdStory;
                    object pBreak = (int)MSWord.WdBreakType.wdPageBreak;//下一頁(上一頁最後一行空,否則跳入下下頁)

                    //object start = wordApp.ActiveWindow.Selection.End;//定位文件末尾
                    //object end = wordApp.ActiveWindow.Selection.End;
                    //MSWord.Range rng = wordDoc.Range(ref start, ref end);
                    //rng.Select();  
                    //rng.Paste();  

                    for (int i = 0; i < tableCount-1;i++ )//原本手簿已存在一個，則複製減1個
                    {
                        wordApp.Selection.EndKey(ref myUnit, ref Nothing);
                        wordApp.Selection.InsertBreak(ref pBreak);
                        wordApp.Selection.PasteAndFormat(MSWord.WdRecoveryType.wdPasteDefault);//複製語句：應用程式形式
                        //wordApp.Selection.Paste();//複製語句：簡單形式
                    }
                        MessageBox.Show("手簿載入完成！");
                }
                catch(Exception ex)
                {
                    MessageBox.Show(ex.Message);
                }
            }
        }

(4)將txt資料寫入變化後的Word文件並儲存

//原始資料：TextData中
        private void toolStripMenuItem3_Click(object sender, EventArgs e)
        {
            try
            {
                #region 文件頭
                object bm1 = "雲量";
                wordDoc.Bookmarks.get_Item(ref bm1).Range.Text = "多雲";
                object bm2 = "風向風速";
                wordDoc.Bookmarks.get_Item(ref bm2).Range.Text = "無風";
                object bm3 = "天氣";
                wordDoc.Bookmarks.get_Item(ref bm3).Range.Text = "晴朗";
                #endregion
                List<string> Data = TextData.Where(s => s.ToCharArray().Count() > 35).ToList();//全部都是5行5行的 
                int tabturn = 0;//表格計數
                foreach(MSWord.Table table in wordDoc.Tables)
                {
                    for (int i = 1; i < 8; i++)
                    {
                        List<string> tempData = new List<string>();
                        for (int j = 35 * tabturn + (i - 1) * 5; j < 35 * tabturn + i * 5; j++)
                        {
                            tempData.Add(Data[j]);
                        }
                        #region 文件表格賦值
                        table.Cell(4 * i + 1, 1).Range.Text = i + "測站";
                        table.Cell(4 * i + 1, 5).Range.Text = (double.Parse(tempData[0].Trim().Split(' ')[2].Substring(6, 9)) / 100.0).ToString();//後尺基本(mm)
                        table.Cell(4 * i + 2, 5).Range.Text = (double.Parse(tempData[1].Trim().Split(' ')[2].Substring(6, 9)) / 100.0).ToString();//前尺基本(mm)
                        table.Cell(4 * i + 2, 6).Range.Text = (double.Parse(tempData[2].Trim().Split(' ')[2].Substring(6, 9)) / 100.0).ToString();//前尺輔助(mm)
                        table.Cell(4 * i + 1, 6).Range.Text = (double.Parse(tempData[3].Trim().Split(' ')[2].Substring(6, 9)) / 100.0).ToString();//後尺輔助(mm)
                        table.Cell(4 * i + 3, 2).Range.Text = ((double.Parse(tempData[0].Trim().Split(' ')[1].Substring(6, 9)) / 1e2 + double.Parse(tempData[3].Trim().Split(' ')[1].Substring(6, 9)) / 1e2) / 2).ToString();//後視距離(mm)
                        table.Cell(4 * i + 3, 3).Range.Text = ((double.Parse(tempData[1].Trim().Split(' ')[1].Substring(6, 9)) / 1e2 + double.Parse(tempData[2].Trim().Split(' ')[1].Substring(6, 9)) / 1e2) / 2).ToString();//前視距離(mm)
                        table.Cell(4 * i + 4, 2).Range.Text = ((int)(((double.Parse(tempData[0].Trim().Split(' ')[1].Substring(6, 9)) / 1e5 + double.Parse(tempData[3].Trim().Split(' ')[1].Substring(6, 9)) / 1e5) / 2 - (double.Parse(tempData[1].Trim().Split(' ')[1].Substring(6, 9)) / 1e5 + double.Parse(tempData[2].Trim().Split(' ')[1].Substring(6, 9)) / 1e5) / 2) * 10000 + 0.5) / 10000.0).ToString();//後前視距離差(m)
                        table.Cell(4 * i + 4, 3).Range.Text = (double.Parse(tempData[4].Trim().Split(' ')[3].Substring(6, 9)) / 1e5).ToString();//前後視距差累積(m)
                        table.Cell(4 * i + 1, 7).Range.Text = ((int)((double.Parse(tempData[0].Trim().Split(' ')[2].Substring(6, 9)) / 100.0 - double.Parse(tempData[3].Trim().Split(' ')[2].Substring(6, 9)) / 100.0) * 1000 + 0.5) / 1000.0).ToString();//基+K-輔(mm)
                        table.Cell(4 * i + 2, 7).Range.Text = ((int)((double.Parse(tempData[1].Trim().Split(' ')[2].Substring(6, 9)) / 100.0 - double.Parse(tempData[2].Trim().Split(' ')[2].Substring(6, 9)) / 100.0) * 1000 + 0.5) / 1000.0).ToString();//基+K-輔(mm)
                        table.Cell(4 * i + 3, 5).Range.Text = ((int)((double.Parse(tempData[0].Trim().Split(' ')[2].Substring(6, 9)) / 100.0 - double.Parse(tempData[1].Trim().Split(' ')[2].Substring(6, 9)) / 100.0) * 10000 + 0.5) / 10000.0).ToString(); //後-前（基本mm）
                        table.Cell(4 * i + 3, 6).Range.Text = ((int)((double.Parse(tempData[3].Trim().Split(' ')[2].Substring(6, 9)) / 100.0 - double.Parse(tempData[2].Trim().Split(' ')[2].Substring(6, 9)) / 100.0) * 10000 + 0.5) / 10000.0).ToString(); //後-前（輔助mm）
                        table.Cell(4 * i + 3, 7).Range.Text = ((int)((double.Parse(tempData[0].Trim().Split(' ')[2].Substring(6, 9)) / 100.0 - double.Parse(tempData[3].Trim().Split(' ')[2].Substring(6, 9)) / 100.0 - (double.Parse(tempData[1].Trim().Split(' ')[2].Substring(6, 9)) / 100.0 - double.Parse(tempData[2].Trim().Split(' ')[2].Substring(6, 9)) / 100.0)) * 1000 + 0.5) / 1000.0).ToString(); //檢核
                        table.Cell(4 * i + 4, 6).Range.Text = (double.Parse(tempData[4].Trim().Split(' ')[5].Substring(6, 9)) / 1e5).ToString();//高差
                        #endregion
                    }
                    tabturn += 1;
                }

                //文件另存為並退出
                saveFileDialog1.Filter = "文件(*.docx)|*.docx|(*.doc)|*.doc";
                if(saveFileDialog1.ShowDialog()==DialogResult.OK)
                {
                    object filePath = saveFileDialog1.FileName;
                    object format = MSWord.WdSaveFormat.wdFormatDocumentDefault;//docx
                    //object format = MSWord.WdSaveFormat.wdFormatDocument;//doc
                    wordDoc.SaveAs(ref filePath, 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);
                    ((MSWord._Document)wordDoc).Close(ref Nothing, ref Nothing, ref Nothing);
                    ((MSWord._Application)wordApp).Quit(ref Nothing, ref Nothing, ref Nothing);
                }
            }
            catch(Exception ex)
            {
                MessageBox.Show(ex.ToString());
            }
            finally
            {
                if (wordApp != null)
                {
                    Marshal.FinalReleaseComObject(wordApp);
                    wordApp = null;
                }

                if (wordDoc != null)
                {
                    Marshal.FinalReleaseComObject(wordDoc);
                    wordDoc = null;
                }
            }
        }
注：當向Word表格中輸入資料時，迴圈處程式碼較多，但本質上並不複雜。

(5)部分txt文字資料（萊卡數字水準儀資料）

410001+?......2 
110002+000000A1 83..28+00000000 
110003+000000A1 32...8+01471340 331.08+00096547 390...+00000002 391.08+00000000 71....+00000001 
110004+00000001 32...8+01457115 332.08+00144543 390...+00000002 391.08+00000005 
110005+00000001 32...8+01456595 336.08+00144553 390...+00000002 391.08+00000002 
110006+000000A1 32...8+01470969 335.08+00096549 390...+00000002 391.08+00000001 
110007+00000001 571.08+00000008 572.08+00000008 573..8+00014300 574..8+02928010 83..08-00048000 
110008+00000001 32...8+01616093 331.08+00143847 390...+00000002 391.08+00000001 
110009+00000002 32...8+01626730 332.08+00136480 390...+00000002 391.08+00000000 
110010+00000002 32...8+01626589 336.08+00136477 390...+00000002 391.08+00000001 
110011+00000001 32...8+01616202 335.08+00143831 390...+00000002 391.08+00000024 
110012+00000002 571.08+00000013 572.08+00000021 573..8+00003788 574..8+06170816 83..08-00040640 
410013+?......2 
110014+000000A1 83..08+00000000 
110015+000000A1 32...8+01625880 331.08+00136485 390...+00000002 391.08+00000003 
110016+00000001 32...8+01617791 332.08+00143837 390...+00000002 391.08+00000004 
110017+00000001 32...8+01617711 336.08+00143834 390...+00000002 391.08+00000003 
110018+000000A1 32...8+01624988 335.08+00136499 390...+00000002 391.08+00000002 
110019+00000001 571.08-00000017 572.08-00000017 573..8+00007683 574..8+03243185 83..08-00007344 
110020+00000001 32...8+01460178 331.08+00144567 390...+00000002 391.08+00000001 
110021+00000002 32...8+01469076 332.08+00096601 390...+00000002 391.08+00000000 
110022+00000002 32...8+01469139 336.08+00096599 390...+00000002 391.08+00000002 
110023+00000001 32...8+01460232 335.08+00144565 390...+00000002 391.08+00000001 
110024+00000002 571.08-00000001 572.08-00000018 573..8-00001220 574..8+06172497 83..08+00040622

(6)部分結果截圖

result

C#操作Word（開啟建立,選擇複製,寫入資料,儲存關閉）

(1)必要變數（欄位）定義 private object Nothing = Missing.Value;//預設值 private object IsReadOnly = false;//不僅僅可讀 private MSWord._Applicat

C#操作Word（五）——在Word文件中插入圖片

例項說明在Word文件的使用過程中，我們可以輕鬆的向文件中插入圖片資訊，那麼，怎樣使用C#向Word文件中插入圖片呢？本例項將會介紹一種方法，可以方便的實現上述功能。例項執行效果如圖1所示。圖1 在Word文件中插入圖片例項執行中單擊“建立Word文件”按鈕，會根

C#操作Word（三）——C#向Word文件中寫入文字

例項說明 Word有著強大的文字編輯功能，我們可以輕鬆的在Word中輸入文字內容，更改文字字型，設定文字大小、顏色，方便的對文字內容排版。在前面的例項中已經詳細介紹了怎樣使用C#建立Word文件，本例項將會使用C#方便的向指定的Word文件中輸入文字內容。例項執行效果如圖1所

C#中操作Word（2）—— 新建、開啟、儲存和關閉文件

本文中主要介紹C#中對word文件進行新建、開啟、儲存、關閉的方法。在本次試驗之前，先佈置試驗環境。首先，先新建一個winform的工程WordTest：然後，在介面中新增一個按鈕，按鈕文字就叫做“測試”：在按鈕的點選事

C# 操作word總結（一）——建立文件和新增頁首頁尾

最近程式中經常使用到word的操作，我在網上查了一些資料，在這裡整理一下。使用程式碼建立word文件： #region 新建Word文件 /// <summary> /// 動態生成Word文件並填充內容 /// </summa

C# 操作Word書簽（二）——讀取、替換Word書簽

內容替換 ces name 保存 graphs nav edit 51cto 變量在上一篇文章中介紹了關於C#如何插入Word書簽、插入圖片或表格到word、刪除word書簽等內容，本篇文章將繼續介紹C#操作word書簽的方法。下面的示例中將介紹 C# 如何讀取Word

C#操作Word總結（二）——設定文件格式並新增文字內容、超連結、新增圖片

設定文件格式並新增內容 #region 設定文件格式並新增文字內容、超連結 /// <summary> /// 設定文件格式並新增內容 /// </summary> /// <param name="filePath">檔名&

C#中操作Word（8）—— 向Word中插入圖表的三種方法（一）

一、前言本文主要介紹向word中插入圖表的方法。方法共有三種，每一種都有自己的適用範圍和利弊。介紹之前，我們準備實驗用的文件，做一個如下圖所示的word模板，我們要做的的是在這個名叫chart的書籤中插入一個圖表，下面然後我將逐一進行介紹這三種方法：

C#中操作Word（5）—— 利用BookMark物件寫Word文件

一、引言本文主要介紹通過Word中的書籤Bookmark來向Word中寫入我們自定義的資料。之前的文章介紹了利用Range物件讀寫word的方法，用這種方法如果處理比較簡單的文件還好，若文件較複雜，就顯得有些力不從心了。比如有這麼一個文件

C#操作Word Aspose.Words組件介紹及使用—基本介紹與DOM概述

控制包含枚舉類讀取標記服務器端方法 python level 1.基本介紹 Aspose.Words是一個商業.NET類庫，可以使得應用程序處理大量的文件任務。Aspose.Words支持Doc，Docx，RTF，HTML，OpenDocument，PDF，XP

C#操作Word的+ CKEditor 輸出成Word文件(包含圖案上傳)

ocx 格式生成word文檔 div 批量導出動態生成 pos 方法 ngs C#操作Word 參考博文： C#操作word類文件 https://www.cnblogs.com/walking/p/3571068.html C#中的Office操作專欄(21) h

C#操作Word文檔—— 如何設置Word文檔背景

C# .NET Word API 背景色免費類庫 .NET Word是我們日常生活、學習和工作中必不可少的文檔處理工具。精致美觀的文檔能在閱讀時帶來視覺上的美感。在本篇文章中，將介紹如何使用組件Free Spire.Doc for .NET（社區版）給Word設置文檔背景。下面的示例中，

C# 操作Word文本框——插入圖片、表格、文字、超鏈接等

C# .NET Word 文本框 Spire.Doc 概述 Text Box（文本框）是Word排版的工具之一。在Word文檔中的任何地方插入文本框，可添加補充信息，放在合適的位置，也不會影響正文的連續性。我們可以設置文本框的大小，線型，內部邊距，背景填充等效果。文本框內可以圖文混排，設置

C# 操作Word 中的OLE——插入、編輯、讀取 OLE

net 使用 water 添加引用 string 下載 system using ins 概述 OLE，Object Linking and Embedding，即對象連接與嵌入。我們在設計程序時，OLE可以用來創建復合文檔，把文字、聲音、圖像、表格、應用程序等類型的信息組

【C#】EF學習<二> DbFirst （先建立資料庫，表及其關聯關係）

工程壓縮檔案放到百度雲盤---20181019001資料夾 1. 建立表的指令碼 create table Teacher ( TID char(12) primary key, Tname char(6) not null ) create table

C程式設計--排序（冒泡、選擇、插入）--插入

演算法排序個人說明：排序的演算法有許多種，該部落格只是列舉了部分常用的排序方式，以供參考。程式使用語言為C語言。 3.插入排序法基本思想：在要排序的一組數中，假設前面(n-1)[n>=2] 個數已經是排好順序的，現在要把第n個數插到前面的有序數中，使得這n

C程式設計--排序（冒泡、選擇、插入）--選擇

演算法排序個人說明：排序的演算法有許多種，該部落格只是列舉了部分常用的排序方式，以供參考。程式使用語言為C語言。 2.選擇排序法基本思想： 1.在要排序的一組數中，選出最小的一個數與第一個位置的數交換； 2.然後在剩下的數當中再找最小的與第二個位置的數交換，如此迴

C程式設計--排序（冒泡、選擇、插入）--冒泡

演算法排序個人說明：排序的演算法有許多種，該部落格只是列舉了部分常用的排序方式，以供參考。程式使用語言為C語言。 1.氣泡排序法基本思想：在要排序的一組數中，對當前還未排好序的範圍內的全部數，自上而下對相鄰的兩個數依次進行比較和調整，讓較大的數往下沉，較小的往上

C#操作Word的方法總結

本文中用C#來操作Word，包括：建立Word；插入文字，選擇文字，編輯文字的字號、粗細、顏色、下劃線等；設定段落的首行縮排、行距；設定頁面頁邊距和紙張大小；設定頁首、頁碼；插入圖片，設定圖片寬高以及給圖片新增標題；插入表格，格式化表格，往表格中插

C程式設計--排序（冒泡、選擇、插入）

演算法排序個人說明：排序的演算法有許多種，該部落格只是列舉了部分常用的排序方式，以供參考。程式使用語言為C語言。 1.氣泡排序法基本思想：在要排序的一組數中，對當前還未排好序的範圍內的全部數，自上而下對相鄰的兩個數依次進行比較和調整，讓較大的數往下沉，較

C#操作Word（開啟建立,選擇複製,寫入資料,儲存關閉）

(1)必要變數（欄位）定義

(2)讀取txt資料

(3)開啟原本的Word文件，並複製其中的表格

(4)將txt資料寫入變化後的Word文件並儲存

(5)部分txt文字資料（萊卡數字水準儀資料）

(6)部分結果截圖

相關推薦