我隐藏的Excel工作表 你别想取消

http://soft.yesky.com/office/488/2633488.shtml

在Excel中,通常隐藏工作表的操作方法如下:

  把需要隐藏的工作表激活成当前工作表,执行一下“格式→工作表→隐藏”命令,即可将其隐藏起来。

  这样隐藏的工作表,通过执行“格式→工作表→取消隐藏”命令,打开“取消隐藏”对话框(如图1),选中需要显示出来的工作表名称,单击一下“确定”按钮即可将其显示出来。

  今天,我给大家介绍一种隐藏工作表的方法,通过这种方法隐藏的工作表,别人显示不出来。

  1、启动Excel,打开相应的工作簿文档。

  2、按下Alt+F11组合键进入VBA编辑状态(如图2)。

点击放大此图片

  3、按下F4功能键,展开“属性”窗口(参见图3)。

  4、选中相应工作簿中需要隐藏的工作表(如“Sheet3(PPT)”),然后在下面的属性窗口中,找到“Visible”选项,单击其右侧的下拉按钮,在随后出现的下拉列表中,选择 “0-xlSheetVeryHidden”选项。

  注意:每个工作簿文档中,至少要有一个工作表不被隐藏。

  5、再执行“工具→VBAProject属性”命令,打开“VBAProject-工程属性”对话框(如图3)。

  6、切换到“保护”标签下,选中“查看时锁定工程”选项,并输入密码,确定返回(参见图3)。

  7、退出VBA编辑状态,保存一下工作簿文档,隐藏实现。

  经过这样的设置以后,我们发现“格式→工作表→取消隐藏”命令是灰色的,无法执行;如果想通过VBA编辑窗口修改属性,发现需要提供密码(如图4),不知道密码就无法取消隐藏了。

 

展开阅读全文

隐藏工作表,怎么取得?

07-08

使用ODBC的方法读取Excel的时候,发现隐藏的工作表,没有被读取.求教,该怎么做!rnrn代码如下:rnstring strConn = "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" + Path + ";Extended Properties='Excel 8.0;HDR=NO;IMEX=1;'";rn  OleDbConnection conn = new OleDbConnection(strConn);rn      DataSet ds = new DataSet();rnrn conn.Open();rn tryrn rn       //返回Excel的架构,包括各个sheet表的名称,类型,创建时间和修改时间等 rn       [color=#FF0000] DataTable dtSheetName = conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables,new object[] null,null,null,"TABLE");[/color]rnrn       //包含excel中表名的字符串数组rn       string[] strTableNames = new string[dtSheetName.Rows.Count];rn       for(int k=0;k<[color=#99CC00]dtSheetName.Rows.Count[/color];k++)rn       rn         strTableNames[k] = dtSheetName.Rows[k]["TABLE_NAME"].ToString();rn rn //[$Print_Area],[$Print_Titles],[$_]等rn bool blnRet = strTableNames[k].EndsWith( "$");rnrn if (blnRet == false) rn rn continue;rn rnrn     //从指定的表明查询数据,可先把所有表明列出来供用户选择rn     string strExcel ="select * from[" + strTableNames[k] + "]";rn     OleDbDataAdapter myCommand = new OleDbDataAdapter(strExcel,strConn);rn tryrn rn //将Excel文件中的数据存入DataSet中rn myCommand.Fill(ds, strTableNames[k].Replace("$",""));rn rn catch(Exception ex)rn rn throw ex;rn rn finallyrn rn myCommand.Dispose(); rn rn rn rn catch(Exception ex)rn rn throw ex;rn rn finallyrn rn conn.Close(); rn rnrn return ds; 论坛

没有更多推荐了,返回首页