如何用VBA选定几个不连续的区域？

sqhsqhli · 发表于 2011-1-19 15:24

如何用VBA选定几个不连续的区域？如1、5、7段。请高手指点。

正弋老兵 · 发表于 2011-1-19 15:31

如有规律的,就用数学法. 没有规律的,用强行法

sqhsqhli · 发表于 2011-1-19 15:34

原帖由 正弋老兵 于 2011-1-19 15:31 发表
如有规律的,就用数学法. 没有规律的,用强行法

此言何意？愿闻其详。

eqzh · 发表于 2011-1-19 15:37

用union连接不相邻区域

chenzyyysl · 发表于 2011-1-19 15:37

正好昨天才学到的，看看
Set Rng = Union([G2], [G11], [G20], [G29], [G38], [O2], [O11], [O20], [O29], [O38])

HadesBoss · 发表于 2011-1-19 15:40

Range("A1:A2, A5:A7, A10:A15").Select

[ 本帖最后由 HadesBoss 于 2011-1-19 15:44 编辑 ]

sqhsqhli · 发表于 2011-1-19 16:24

用各位的办法，写了代码实验。可是Word说union没定义，不认识它哦。是不是只是在excel里用？如果也可以在Word用，请给个完整代码。此外，假如同时选定后，可以进行格式编辑吗？

Sub yyy()
Dim sss As Range
Set sss = Union(ActiveDocument.Paragraphs(1).Range, ActiveDocument.Paragraphs(3).Range)
sss.Select
With Selection
.Font.Size = 40
End With
Set sss = Nothing
End Sub

linyancheng · 发表于 2011-1-20 18:06

好像2007以後版本才支援多重選擇。
否則就用循環來替代。

wangfeng0918 · 发表于 2015-4-11 23:10

不带变量的好弄，如果最后一行用变量表示我不会喽。

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

[求助] 如何用VBA选定几个不连续的区域？

回复 1楼 sqhsqhli 的帖子

浏览过的版块