如何在隐藏的工作表里输入数据?

[复制链接]
查看11 | 回复1 | 2011-3-5 15:03:43 | 显示全部楼层 |阅读模式
当然可以了用下面两个过程Sub 取消工作表隐藏()Sheets("sheet1").Visible = TrueSheets("sheet1").Range("a1") = "abc"End SubSub 隐藏工作表()Sheets("Sheet1").Visible = FalseEnd Sub第一个可取消工作表SHEET1的隐藏状态,并在它的A1单元格内输入内容。第二个可将SHEET1工作表隐藏。只要在加密的代码中调用(或直接加入代码)这两个过程就行了。...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行