首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >使用C#.net编辑单词段落

使用C#.net编辑单词段落
EN

Stack Overflow用户
提问于 2013-09-18 06:41:22
回答 3查看 2.1K关注 0票数 0

我正在以编程方式使用C#.net,Interop.Word编写一个word文档,我在这个文档中有段以"#“开头和结尾。

示例:

很久以前,有个小女孩住在森林附近的一个村庄里。每当她出去的时候,小女孩都穿着一件红色的斗篷,所以村里的每个人都叫她小红帽Hood.#

一天早上,小红帽问她的母亲是否可以去看望她的祖母,因为他们已经有一段时间没见过other.#了。

“这是个好主意,”她母亲说。所以他们装了一个漂亮的篮子让小红帽带着去她的grandmother.#

现在,在所有#之间,我需要文本粗体

EN

回答 3

Stack Overflow用户

回答已采纳

发布于 2013-09-20 10:21:03

修好了。

代码语言:javascript
运行
复制
        oWord.Selection.HomeKey( Microsoft.Office.Interop.Word.WdUnits.wdStory );
        oWord.Selection.ClearFormatting();

        bool done = false;
        while ( !done )
        {
           object txt = "#*#";
           object oFalse = false;
           object oTrue = true;
           object wdWrap = Microsoft.Office.Interop.Word.WdFindWrap.wdFindStop;
           oWord.Selection.Find.Execute( ref txt, ref oFalse, ref oFalse, ref oTrue, ref oFalse, ref oFalse, ref oTrue, ref wdWrap, ref oFalse );
           if ( oWord.Selection.Find.Found == false )
           {
              done = true;
           }
           else
           {
              oWord.Selection.Font.Bold = 1;
              oWord.Selection.Text = oWord.Selection.Text.Substring( 1, oWord.Selection.Text.Length - 2 );
              oWord.Selection.MoveRight( Microsoft.Office.Interop.Word.WdUnits.wdCharacter );
           }
        }
票数 0
EN

Stack Overflow用户

发布于 2013-09-18 14:59:54

代码语言:javascript
运行
复制
Sub Macro1()
'
' Macro1 Macro
'
'
    Selection.HomeKey Unit:=wdStory
    Selection.Find.ClearFormatting
    Dim done As Boolean
    done = False
While Not done
    With Selection.Find
        .Text = "#*#"
        .Replacement.Text = "*"
        .Forward = True
        .Wrap = wdFindStop
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With

 Selection.Find.Execute

 If Selection.Find.Found = False Then
    done = True
 Else
    Selection.Text = Mid(Selection.Text, 2, Len(Selection.Text) - 2)
    Selection.Font.Bold = wdToggle
    Selection.EndKey Unit:=wdLine
End If

Wend

End Sub
票数 0
EN

Stack Overflow用户

发布于 2013-09-20 06:03:34

代码语言:javascript
运行
复制
oWord.Selection.ClearFormatting();

 bool done = false;
 while (!done)
 {
    object txt = "#*#";
    object oFalse = false;
     object oTrue = true;
    object wdWrap =      Microsoft.Office.Interop.Word.WdFindWrap.wdFindStop;
 oWord.Selection.Find.Execute(ref txt, ref oFalse, ref oFalse, ref oTrue, ref oFalse, ref oFalse, ref oTrue, ref wdWrap  , ref oFalse, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing);
  if (oWord.Selection.Find.Found == false)
     {
        done = true;
     }
  oWord.Selection.Text = oWord.Selection.Text.Substring(2 - 1, oWord.Selection.Text.Length - 2);
   oWord.Selection.Font.BoldBi = 1;
   oWord.Selection.Bookmarks.Add("TM2011_517_1", ref oMissing);
}
票数 0
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/18865474

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档