如何用Wordvba扩展选区

wangjing321 · 发表于 2022-2-26 21:45

我用expand方法里的单位wdparagraph实现选择功能, 只能选择光标所在的段落, 但是如何选择该段落下面的几个段落呢?求教!

413191246se · 发表于 2022-2-26 23:03

Selection.Next(4, 1).Select

lss001 · 发表于 2022-2-27 00:15

本帖最后由 lss001 于 2022-3-2 17:47 编辑

Sub 选择光标及以下段落()
With ActiveDocument
n = .Range(0, Selection. _
Range.End).Paragraphs.Count '光标所在段
ks = .Paragraphs(n).Range.Start '开始
q = .Paragraphs.Count '段落总数
js = .Paragraphs(q).Range.End '结束
.Range(Start:=ks, End:=js).Select '选择
End With
End Sub

413191246se · 发表于 2022-2-28 23:51

Selection.MoveEnd 4, 3

wangjing321 · 发表于 2022-3-10 20:12

413191246se 发表于 2022-2-28 23:51
Selection.MoveEnd 4, 3

你的方法好简单

		自动登录	找回密码
密码			免费注册

[求助] 如何用Wordvba扩展选区