word宏vb中怎样在word中改内容

word2003中英文每句话开始第一个字母由小写改为大写。(每句的句尾有英文句号)我想用if语句,如果出现".",那么"."后面字母改为大写。并且编程后怎样应用到word中。

示例:把c:\1.doc中的“一”替换为“壹”:
Private Sub Command1_Click()
Dim wordObj
Set wordObj = CreateObject("Word.Application")
With wordObj.Documents.Open("c:\1.doc")
.Content.Find.Execute "一", , , , , , , , , "壹", 2
.Save
End With
wordObj.quit
End Sub追问

您这是替换固定字,但是我要改的是不一样的,每句话首字母是不同的。

温馨提示:答案为网友推荐,仅供参考

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网