[已解决]修改一句代码（Rows.Hidden）

爱疯 · 发表于 2010-2-12 13:35

Sub Macro2()
Rows("10:11").Hidden = True
End Sub

当10用变量替代后，请问该怎么改？

谢谢！

最佳答案

dsmch

2010-2-12 13:42

x = 5
Rows(x & ":11").Hidden = True

dsmch · 发表于 2010-2-12 13:42

x = 5
Rows(x & ":11").Hidden = True

爱疯 · 发表于 2010-2-12 13:49

QUOTE:

以下是引用dsmch在2010-2-12 13:42:00的发言：
x = 5
Rows(x & ":11").Hidden = True

谢谢dsmch

不好意思，我才发现这里的区别：实际问题中11是65536

爱疯 · 发表于 2010-2-12 13:50

Rows(x & ":65536").Hidden = True
Range(Cells(x, 1), Cells(65536, 256)).Hidden = True

也就是，这样都不行呀？

爱疯 · 发表于 2010-2-12 13:55

最后1次⊙﹏⊙b汗

又发现，不行的原因是：5行之下有一个按钮，把按钮拿到5行之上就行了。

dsmch · 发表于 2010-2-12 13:58

不影响，同样是那些行

如果用后者的方法，可以这样：
Range(Cells(2, 1), Cells(10, 1)).EntireRow.Hidden = True

爱疯 · 发表于 2010-2-12 14:08

QUOTE:

以下是引用dsmch在2010-2-12 13:58:00的发言：

不影响，同样是那些行

如果用后者的方法，可以这样：
Range(Cells(2, 1), Cells(10, 1)).EntireRow.Hidden = True

WryZ6MZO.rar (7.71 KB, 下载次数: 2)

dsmch · 发表于 2010-2-12 14:24

这个平常还真没注意到，多谢了

我的意思是rows("5:11") 和rows("11:5")选定的行数是一样的

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