+ -
当前位置:首页 → 问答吧 → 用vba选择第二段怎么表示?

用vba选择第二段怎么表示?

时间:2011-07-13

来源:互联网

1、用vba怎么选择第二段?
2、用vba怎么选择第二行?
3、用vba怎么选择第二段的第三个字?

谢谢。

作者: mn860429   发布时间: 2011-07-13

人工顶置下,谢谢。

作者: mn860429   发布时间: 2011-07-14

Sub duan()
ActiveDocument.Paragraphs(2).Range.Select
End Sub
Sub hang()
Dim i, zhidinghangshu
zhidinghangshu = 3 '比如指定行数为3,超最大行则选最后行
Selection.HomeKey unit:=wdStory
For i = 1 To zhidinghangshu - 1
Selection.MoveDown unit:=wdLine
Next
Selection.HomeKey unit:=wdLine
Selection.EndKey unit:=wdLine, Extend:=wdExtend
End Sub
Sub zifu()
ActiveDocument.Paragraphs(2).Range.Characters(2).Select
End Sub

作者: sqhsqhli   发布时间: 2011-07-14

谢谢。

作者: mn860429   发布时间: 2011-07-14

Sub 宏1()
    With Selection
    .HomeKey Unit:=wdStory
    .MoveDown Unit:=wdLine, Count:=2
    .HomeKey Unit:=wdLine
    .EndKey Unit:=wdLine, Extend:=wdExtend
    End With
End Sub
录了个宏

作者: mn860429   发布时间: 2011-07-14