中,新建一個(gè)word文檔對(duì)象并循環(huán)List打開(kāi)對(duì)應(yīng)的word,之后拷貝文檔,在新文檔中粘貼并且粘貼前先插入換行符。最后保存新文檔,并銷毀進(jìn)程。protectedvoidButton1_Click(objectsender,EventArgse){//objectworPath=@"C:\";objectpath=@"C:\Test合并word.doc";ListpathList=newLi" />
歡迎來(lái)訪張軍網(wǎng)站:連續(xù)登錄【5】天博主自動(dòng)為您充值【5】積分哦
歡迎來(lái)訪張軍網(wǎng)站:連續(xù)登錄【5】天博主自動(dòng)為您充值【5】積分哦
黃聰:C#操作合并多個(gè)Word文檔
系統(tǒng)
3072 0
首先將word文檔路徑保存在List<string>中,新建一個(gè)word文檔對(duì)象并循環(huán)List打開(kāi)對(duì)應(yīng)的word,之后拷貝文檔,在新文檔中粘貼并且粘貼前先插入換行符。最后保存新文檔,并銷毀進(jìn)程。
protected
void
Button1_Click(
object
sender, EventArgs e)????

{????
// object worPath = @"C:\";????
object
path =
@"C:\Test合并word.doc"
;????

List<
string
> pathList =
new
List<
string
>();????

pathList.Add(
@"C:\word1.doc"
);????

pathList.Add(
@"C:\word2.doc"
);????
object
objDocType = WdDocumentType.wdTypeDocument;????
object
type = WdBreakType.wdSectionBreakContinuous;????

Application wordApp;
//Word應(yīng)用程序變量????

Document newWordDoc;
//Word文檔變量????
object
readOnly =
false
;????
object
isVisible =
false
;????

wordApp =
new
ApplicationClass();
//初始化????
//由于使用的是COM庫(kù),因此有許多變量需要用Missing.Value代替????

Object Nothing = Missing.Value;????
//wordDoc = wordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);????

newWordDoc = wordApp.Documents.Add(
ref
Nothing,
ref
Nothing,
ref
Nothing,
ref
Nothing);????
for
(
int
i = 0; i < pathList.Count; i++)????

{????

Document openWord;????
object
obj = pathList[i];????

openWord = wordApp.Documents.Open(
ref
obj,
ref
Nothing,
ref
readOnly,
ref
Nothing,????
ref
Nothing,
ref
Nothing,
ref
Nothing,
ref
Nothing,
ref
Nothing,
ref
Nothing,????
ref
Nothing,
ref
isVisible,
ref
Nothing,
ref
Nothing,
ref
Nothing,
ref
Nothing);????

openWord.Select();????

openWord.Sections[1].Range.Copy();????
//string str= Clipboard.GetText(TextDataFormat.Text);????
// str+="\n\n";????
// Clipboard.SetData(DataFormats.Text, str);????
object
start = 0;????

Range newRang = newWordDoc.Range(
ref
start,
ref
start);????

newWordDoc.Sections[1].Range.InsertBreak(
ref
type);
//插入換行符????

newWordDoc.Sections[1].Range.PasteAndFormat(WdReco veryType.wdPasteDefault);????

openWord.Close(
ref
Nothing,
ref
Nothing,
ref
Nothing);????

}????
object
format = WdSaveFormat.wdFormatDocument;
//.wdFormatDocumentD efault;????
//將wordDoc文檔對(duì)象的內(nèi)容保存為DOCX文檔????

newWordDoc.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);????
//關(guān)閉wordDoc文檔對(duì)象????

newWordDoc.Close(
ref
Nothing,
ref
Nothing,
ref
Nothing);????
//關(guān)閉wordApp組件對(duì)象????

wordApp.Quit(
ref
Nothing,
ref
Nothing,
ref
Nothing);????

Console.WriteLine(path +
" 創(chuàng)建完畢!"
);????

Console.ReadLine();????

}????
黃聰:C#操作合并多個(gè)Word文檔
更多文章、技術(shù)交流、商務(wù)合作、聯(lián)系博主
微信掃碼或搜索:z360901061
微信掃一掃加我為好友
QQ號(hào)聯(lián)系: 360901061
您的支持是博主寫作最大的動(dòng)力,如果您喜歡我的文章,感覺(jué)我的文章對(duì)您有幫助,請(qǐng)用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點(diǎn)擊下面給點(diǎn)支持吧,站長(zhǎng)非常感激您!手機(jī)微信長(zhǎng)按不能支付解決辦法:請(qǐng)將微信支付二維碼保存到相冊(cè),切換到微信,然后點(diǎn)擊微信右上角掃一掃功能,選擇支付二維碼完成支付。
【本文對(duì)您有幫助就好】元
主站蜘蛛池模板:
茌平县|
曲松县|
贡觉县|
灯塔市|
额尔古纳市|
四子王旗|
浙江省|
福泉市|
宜宾市|
徐闻县|
赤壁市|
潼关县|
抚远县|
遵义县|
苏尼特右旗|
舟山市|
任丘市|
呼图壁县|
上栗县|
永川市|
武城县|
西青区|
泸西县|
敦化市|
景德镇市|
崇州市|
屯昌县|
犍为县|
三穗县|
神农架林区|
馆陶县|
临沧市|
渭源县|
正宁县|
荣昌县|
义马市|
南汇区|
香港
|
海伦市|
商水县|
阿勒泰市|