请问如何对多个工作表设定冻结窗口或取消冻结？

yinxingbaoshu · 发表于 2009-1-27 21:51

发现同时选中进行操作，不行……

VAT · 发表于 2009-1-27 21:55

关键词：工作组

雪儿浪漫想 · 发表于 2009-1-27 22:10

楼主说的是对的,工作组状态下也不能冻结或取消冻结窗格

yinxingbaoshu · 发表于 2009-1-27 22:19

请问，有什么方法可以实现呢？

长安布衣 · 发表于 2009-1-27 22:30

Sub myFreezePanes()
For i = 1 To Sheets.Count
Sheets(i).Select
Range("B2").Select
ActiveWindow.FreezePanes = True
Next i

End Sub

Sub myUnFreePanes()
For i = 1 To Sheets.Count
Sheets(i).Select
Range("B2").Select
ActiveWindow.FreezePanes = False
Next i

End Sub

yinxingbaoshu · 发表于 2009-1-28 15:34

谢谢楼上，想不到还必须用vba呀！

itxianfeng · 发表于 2009-1-28 22:15

厉害，才知道冻结窗口还可以从左使用，现在是从上从左都可以

[ 本帖最后由 itxianfeng 于 2009-1-28 22:16 编辑 ]

itxianfeng · 发表于 2009-1-28 22:19

顺便提一个操作上的问题：如果操作一个表的时候。不用VBA 而采用手工操作，怎样设置从左边进行冻结窗口

雪儿浪漫想 · 发表于 2009-1-29 13:17

任选一个单元格,只要不在A列就行,冻结一下看看?

itxianfeng · 发表于 2009-1-30 23:39

原帖由 雪儿浪漫想 于 2009-1-29 13:17 发表
任选一个单元格,只要不在A列就行,冻结一下看看?

原来秘密是在这里，谢谢雪儿浪漫想
不过那样上下也是冻结的了

[ 本帖最后由 itxianfeng 于 2009-1-30 23:41 编辑 ]

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

[求助] 请问如何对多个工作表设定冻结窗口或取消冻结？

评分