小弟我想选择(即变黑)第三段落的第五行的左起第八个中文字符,多谢
我想选择(即变黑)第三段落的第五行的左起第八个中文字符,谢谢这个VBA的代码是什么,请直接要代码。[最优解释
我想选择(即变黑)第三段落的第五行的左起第八个中文字符,谢谢
这个VBA的代码是什么,请直接要代码。
[最优解释]
Sub Macro5()
'
' Macro5 Macro
' 宏在 2012-7-10 由 录制
'
Selection.Start = ThisDocument.Paragraphs(3).Range.Start
Selection.End = Selection.Start
'ThisDocument.Paragraphs(3).Range.Characters(1).Select
Selection.MoveDown Unit:=wdLine, Count:=5 - 1
Selection.MoveRight Unit:=wdCharacter, Count:=8 - 1
Selection.MoveEnd Unit:=wdCharacter, Count:=1
End Sub
[其他解释]班主任,谁在本人的提问后打了那么多的广告,本人要求删贴,无非是再来提问一下。
[其他解释]'选择(即变黑)第三段落的第五行的左起第八个中文字符(要试)
'Dim MyRange
'Set MyRange = ActiveDocument.Paragraphs(10).Range.Characters(1)
'MyRange.Select
'Selection.MoveDown unit:=wdLine, Count:=4 '第五行
'Selection.MoveRight unit:=wdCharacter, Count:=7 '左起第八个字符。也可以用作光标在行单元格内移动
'Selection.MoveLeft unit:=wdCharacter, Count:=1, Extend:=wdExtend '“1”为从第五个开始选择了一个字符。'也可以用作光标在行单元格内移动