主题:【第三届原创参赛】怎样提高化学文档编辑的速率:Word编辑中的另类替换模板

浏览0 回复15 电梯直达
loyndochitea
结帖率:
100%
关注:0 |粉丝:0
新手级: 新兵
我可以照葫芦画瓢,这个照着就能学会,手把手教,用心良苦啊,谢谢!
abcdefghijkl123
结帖率:
100%
关注:0 |粉丝:0
新手级: 新兵
chuhaiou
结帖率:
100%
关注:0 |粉丝:0
新手级: 新兵
技术含量不高,只有这一点VBA语言:
Private Sub CommandButton1_Click()
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = TextBox1.Text
        .Replacement.Text = "^c"
        .Forward = True
        .Wrap = wdFindContinue
        .MatchWholeWord = False
        .MatchByte = True
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub
lindaqianqian
结帖率:
100%
关注:0 |粉丝:0
新手级: 新兵
hrcren
结帖率:
100%
关注:0 |粉丝:0
新手级: 新兵
猜你喜欢最新推荐热门推荐更多推荐
品牌合作伙伴