?物資部提出需求，希望能在整個(gè)系統(tǒng)出臺(tái)之前先幫他們做一個(gè)能提取和寫入數(shù)據(jù)的小東西，方便網(wǎng)上招標(biāo)以及合同的自動(dòng)生成。
?
?
?
俺老師老甄同志把這一艱巨任務(wù)交給我了[原因是他手頭的工作太多了]。經(jīng)過一番討論，我們決定用word自帶的書簽來作為盛放臨時(shí)數(shù)據(jù)的容器。上網(wǎng)查資料，覺得這方面的文章還真是不多。查看office的對(duì)象模型，發(fā)現(xiàn)書簽bookmarks有個(gè)自帶的屬性range，可以通過它來實(shí)現(xiàn)數(shù)據(jù)的提取和寫入，可是問題又隨之而來，怎么樣取得這個(gè)range呢？試了很多種方法，甚至我都想到了是否可以用書簽域來實(shí)現(xiàn)，老甄同志想到了用兩個(gè)書簽，通過確定兩個(gè)書簽的位置來取出中間的數(shù)據(jù)來，可這些都不是些好辦法，我們把注意力放在了怎么樣在word文檔編輯的時(shí)候就把range寫入。一個(gè)偶然的發(fā)現(xiàn)解決了這個(gè)問題，吼吼，難以想象，解決問題也得靠靈感，靈感來了，擋都擋不住，不過這個(gè)發(fā)現(xiàn)還得歸功于范兄。下邊把這一開發(fā)過程及原碼貼上，希望能對(duì)和我有同樣需求的IT民工們有所幫助。
?
?
?
先在已有的word文檔中輸入一串空格[長(zhǎng)度自定，如圖1所示]，然后再選中這竄空格，在此基礎(chǔ)上插入一個(gè)書簽，如圖2所示。
圖1
圖2?
?
?
?
大家可以看到，書簽被分割成了一對(duì)中括號(hào)，中括號(hào)里面的內(nèi)容就是range的內(nèi)容，那么，大家可以隨心所欲寫代碼了，吼吼~~~
原碼如下：
?
private void button1_Click(object sender, EventArgs e)
?
?
?
?
?
?
?
{
?
?
?
?
?
?
?
?
?
?
?
object missingValue = System.Reflection.Missing.Value;
?
?
?
?
?
?
?
?
?
?
?
object myTrue = false;
?
?
?
?
?
?
?
?
?
?
?
object fileName = this.txt_file.Text.Trim().ToString();
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
Word._Application oWord = new Word.ApplicationClass();
?
?
?
?
?
?
?
?
?
?
?
Word._Document oDoc;
?
?
?
?
?
?
?
?
?
?
?
oDoc = oWord.Documents.Open(ref fileName, ref missingValue,
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
ref myTrue, ref missingValue, ref missingValue, ref missingValue,
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
ref missingValue, ref missingValue, ref missingValue,
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
ref missingValue, ref missingValue, ref missingValue,
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
ref missingValue, ref missingValue, ref missingValue,
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
ref missingValue);
?
?
?
?
?
?
?
?
?
?
?
MessageBox.Show(oDoc.Bookmarks.Count.ToString());
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
//寫入word文檔
?
?
?
?
?
?
?
?
?
?
?
object tmp = "msr_01";
?
?
?
?
?
?
?
?
?
?
?
Word.Range tmpRng = oWord.ActiveDocument.Bookmarks.get_Item(ref tmp).Range;
?
?
?
?
?
?
?
?
?
?
?
tmpRng.Text = "魯能工程有限公司221";
?
?
?
?
?
?
?
?
?
?
?
//由于附值以后書簽自動(dòng)消除，為了以后便于修改，需要把書簽再自動(dòng)生成一個(gè)
?
?
?
?
?
?
?
?
?
?
?
object oRng = tmpRng;
?
?
?
?
?
?
?
?
?
?
?
oDoc.Bookmarks.Add(tmp.ToString(), ref oRng);
?
?
?
?
?
?
?
?
?
?
?
object bSaveChange = true;
?
?
?
?
?
?
?
?
?
?
?
oDoc.Close(ref bSaveChange, ref missingValue, ref missingValue);
?
?
?
?
?
?
?
}
more：1、[這是往word文檔里面寫入數(shù)據(jù)，如果要取得數(shù)據(jù)可以用range.text來取得]?
?
?
?
?
?
?
?
2、需要的using指令集是：using
Word = Microsoft.Office.Interop.Word;
如何利用書簽向word文檔讀取或?qū)懭霐?shù)據(jù)[C#](
