對於Word文檔中包含較多的超鏈接，如果一個個來刪除很花費時間和精力，本篇文章將提供一種可用於批量刪除Word中的超鏈接的方法。這裡的超鏈接可以是頁眉頁腳處的超鏈接、正文中的超鏈接、表格中的超鏈接、文字超鏈接、圖片超鏈接等等。下麵將具體演示如何來進行代碼操作。 所需工具 Free Spire.Doc ...
對於Word文檔中包含較多的超鏈接，如果一個個來刪除很花費時間和精力，本篇文章將提供一種可用於批量刪除Word中的超鏈接的方法。這裡的超鏈接可以是頁眉頁腳處的超鏈接、正文中的超鏈接、表格中的超鏈接、文字超鏈接、圖片超鏈接等等。下麵將具體演示如何來進行代碼操作。
所需工具
PS：下載安裝後，註意在項目程式中添加引用Spire.Doc.dll，dll文件可在安裝路徑下的Bin文件夾中獲取。
測試文檔中的超鏈接情況，如下圖：
C# 代碼示例（供參考）
步驟 1 ：添加using指令
using Spire.Doc; using Spire.Doc.Documents; using Spire.Doc.Fields; using Spire.Doc.Formatting; using System.Drawing;
步驟 2 ：載入文件
Document document = new Document(); document.LoadFromFile("sample.docx");
步驟 3 ：遍歷文檔，刪除超鏈接
foreach (Section section in document.Sections) { //刪除正文里的超鏈接 foreach (DocumentObject obj in section.Body.ChildObjects) { RemoveLinks(obj, document); } //刪除頁眉頁腳中的超鏈接 foreach (HeaderFooter hf in section.HeadersFooters) { foreach (DocumentObject hfobj in hf.ChildObjects) { RemoveLinks(hfobj, document); } } }
ps: 這裡需要自定義兩個方法來分別刪除段落中的文字超鏈接和刪除段落中的圖片超鏈接
自定義方法1：
private static void RemoveLinks(DocumentObject obj,Document document) { //刪除段落中的超鏈接 RemoveLinksInPara(obj,document); //刪除表格中的超鏈接 if (obj.DocumentObjectType == DocumentObjectType.Table) { foreach (TableRow row in (obj as Table).Rows) { foreach (TableCell cell in row.Cells) { foreach (DocumentObject cobj in cell.ChildObjects) { RemoveLinksInPara(cobj,document); } } } } }
自定義方法2：
private static void RemoveLinksInPara(DocumentObject obj,Document document) { //遍歷文檔段落中所有子對象 if (obj.DocumentObjectType == DocumentObjectType.Paragraph) { var objs = (obj as Paragraph).ChildObjects; for (int i = 0; i < objs.Count; i++) { if (objs[i].DocumentObjectType == DocumentObjectType.Field) { //獲取超鏈接域 Field field = objs[i] as Field; if (field.Type == FieldType.FieldHyperlink) { //獲取超鏈的文本或圖片對象 DocumentObject dObj = field.NextSibling.NextSibling as DocumentObject; //刪除文本超鏈接，保留文本和樣式 if (dObj is TextRange) { //獲取超鏈接文本樣式 CharacterFormat format = (dObj as TextRange).CharacterFormat; format.UnderlineStyle = UnderlineStyle.None; format.TextColor = Color.Black; //創建TextRange並把超鏈接的文本賦給它 TextRange tr = new TextRange(document); tr.Text = field.FieldText; //應用樣式 tr.ApplyCharacterFormat(format); //刪除文本超鏈接域 objs.RemoveAt(i); //重新插入文本 objs.Insert(i, tr); } //刪除圖片超鏈接，保留圖片 if (dObj is DocPicture) { //刪除圖片超鏈接域 objs.RemoveAt(i); //重新插入圖片 objs.Insert(i, dObj); } } } } } }
步驟 4 ：保存文檔
document.SaveToFile("RemoveLinks.docx", FileFormat.Docx); System.Diagnostics.Process.Start("RemoveLinks.docx");
調試運行程式，生成文檔（如下圖）。生成的文檔中，原有的超鏈接將全部被刪除。
全部代碼：
using Spire.Doc; using Spire.Doc.Documents; using Spire.Doc.Fields; using Spire.Doc.Formatting; using System.Drawing; namespace RemoveHyperlink_Doc { class Program { static void Main(string[] args) { //創建Word對象並載入文檔 Document document = new Document(); document.LoadFromFile("sample.docx"); foreach (Section section in document.Sections) { //刪除正文里的超鏈接 foreach (DocumentObject obj in section.Body.ChildObjects) { RemoveLinks(obj, document); } //刪除頁眉頁腳中的超鏈接 foreach (HeaderFooter hf in section.HeadersFooters) { foreach (DocumentObject hfobj in hf.ChildObjects) { RemoveLinks(hfobj, document); } } } //保存文檔 document.SaveToFile("RemoveLinks.docx", FileFormat.Docx); System.Diagnostics.Process.Start("RemoveLinks.docx"); } private static void RemoveLinks(DocumentObject obj,Document document) { //刪除段落中的超鏈接 RemoveLinksInPara(obj,document); //刪除表格中的超鏈接 if (obj.DocumentObjectType == DocumentObjectType.Table) { foreach (TableRow row in (obj as Table).Rows) { foreach (TableCell cell in row.Cells) { foreach (DocumentObject cobj in cell.ChildObjects) { RemoveLinksInPara(cobj,document); } } } } } private static void RemoveLinksInPara(DocumentObject obj,Document document) { //遍歷文檔段落中所有子對象 if (obj.DocumentObjectType == DocumentObjectType.Paragraph) { var objs = (obj as Paragraph).ChildObjects; for (int i = 0; i < objs.Count; i++) { if (objs[i].DocumentObjectType == DocumentObjectType.Field) { //獲取超鏈接域 Field field = objs[i] as Field; if (field.Type == FieldType.FieldHyperlink) { //獲取超鏈的文本或圖片對象 DocumentObject dObj = field.NextSibling.NextSibling as DocumentObject; //刪除文本超鏈接，保留文本和樣式 if (dObj is TextRange) { //獲取超鏈接文本樣式 CharacterFormat format = (dObj as TextRange).CharacterFormat; format.UnderlineStyle = UnderlineStyle.None; format.TextColor = Color.Black; //創建TextRange並把超鏈接的文本賦給它 TextRange tr = new TextRange(document); tr.Text = field.FieldText; //應用樣式 tr.ApplyCharacterFormat(format); //刪除文本超鏈接域 objs.RemoveAt(i); //重新插入文本 objs.Insert(i, tr); } //刪除圖片超鏈接，保留圖片 if (dObj is DocPicture) { //刪除圖片超鏈接域 objs.RemoveAt(i); //重新插入圖片 objs.Insert(i, dObj); } } } } } } } }View Code
（本文完）
如需轉載，請註明出處。
