菜鸟谈VBA最最基础入门《原创》

zznjcs · 发表于 2009-9-17 17:06

原帖由故事于 2009-9-17 08:26 发表
是隐藏了，取消隐藏就行了。

那人家要是打开了,把隐藏的删掉怎么办?这程序不就废了吗?

[ 本帖最后由 zznjcs 于 2009-9-17 18:05 编辑 ]

zznjcs · 发表于 2009-9-17 19:11

我用下面的两种表示都试过,都可以用来隐藏SHEETS,但是不知道有什么区别?
SHEET1.VISIBLE=XLVERYHIDDEN
SHEET1.VISIBLE=XLSHEETVERYHIDDEN

chenzuzhong · 发表于 2009-9-17 20:10

太好啦，经过两天的认真学习，基本掌握一点皮毛啦！楼主辛苦啦！非常感谢

ggsmart · 发表于 2009-9-18 11:52

原帖由故事于 2009-9-17 07:46 发表
请教一下叶枫，在登录窗体中，我觉得
Private Sub 用户名_Change()
If 用户名.Text = Sheets("系统").Range("b2") And 密码.Text = Sheets("系统").Range("c2") Then
CommandButton1.Enabled = ...

不好意思，输入错误。原来是想当用户名输入正确后“修改密码及用户名”的两个按钮可用。
代码应该是这样的：

Private Sub 用户名_Change()
If 用户名.Text = Sheets("系统").Range("b2") And 密码.Text = Sheets("系统").Range("c2") Then
CommandButton1.Enabled = 1
CommandButton2.Enabled = 1
Else
CommandButton1.Enabled = 0
CommandButton2.Enabled = 0
End If
End Sub

复制代码

ggsmart · 发表于 2009-9-18 11:57

原帖由 zznjcs 于 2009-9-17 19:11 发表
我用下面的两种表示都试过,都可以用来隐藏SHEETS,但是不知道有什么区别?
SHEET1.VISIBLE=XLVERYHIDDEN
SHEET1.VISIBLE=XLSHEETVERYHIDDEN

第一个是“深度隐藏”，深度隐藏就是不能通过菜单里的“格式——工作表——取消隐藏”恢复，必须使用VBA修改才能恢复显示。

psnower · 发表于 2009-9-18 14:32

真的很精彩，希望继续讲下去

psnower · 发表于 2009-9-18 15:00

和你在一起

xcbilly · 发表于 2009-9-18 16:46

真是好教材，楼主辛苦了。

海中的沙漠 · 发表于 2009-9-20 07:49

谢谢楼主，开始一点点学习了！

zyh196712 · 发表于 2009-9-20 17:06

我想不改变各同学的序列信息，以此进行花名册汇总。
只有最前一个表能够复制，试了好多遍，不知代码出错在哪里。

学生花名册汇总zyh2.rar (24.97 KB, 下载次数: 99)

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

菜鸟谈VBA最最基础入门《原创》

zyh196712花名册汇总