1. vba读取隐藏工作表数据

工作表被深度隐藏，查看方式如下：

1. alt+f11打开excel vba；

2. 左侧工程资源管理器中，找到对应工作表，按f4打开属性窗口；

3. 左侧属性窗口的最下方visible选择-1 - xlsheetvisible这样就应该可以看到隐藏的工作表了

2. vba隐藏工作表和取消隐藏工作表

1、直接拖拉的方法：将鼠标移到隐藏的第一行的位置处，当变为上下拖拉的图标时，向下拖拉即可。

2、右键菜单法：先Ctrl+A或者点击最左上角的单元格区域全选，再单击鼠标右键，取消隐藏即可。

3、格式菜单法：先Ctrl+A或者点击最左上角的单元格区域全选，再单击菜单：“格式”-“行”-“取消隐藏”，即可。

4、快捷键法：先Ctrl+A全选，再Ctrl+Shift+9取消行隐藏；如果要取消列隐藏按Ctrl+Shift+0，即可。

5、VBA代码法：ALT+F11打开VBE编辑器，新建一个模块1，粘贴如下代码：运行，即可。

3. vba读取隐藏工作表数据的方法

首先要在此工作簿中，建立一个名叫“首页”的工作表，然后执行下面代码即可。

Sub 链接()

Sheets("首页").Select

'显示所有工作表

For i = 1 To Sheets.Count

Cells(i, 1).Value = Sheets(i).Name

Next

'超链接

For i = 1 To Sheets.Count

t = Cells(i, 1)

Cells(i, 1).Select

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:=t & "!A1", ScreenTip:="进入", TextToDisplay:=t

Next

End Sub

4. vba对隐藏工作表内容的操作

可以将VBA保存成 加载宏 .xlam 或 .xla 在其他Excel中可以加载此项，但不会出现此项的窗口（表格). 你里面写的 函数、方法等可以在别的Excel中使用。

5. vba隐藏单元格内容

选择要添加边框的所有单元格，单击“格式→单元格”命令，选择“边框”选项卡，然后在“样式”中选中所需的线型样式，同时可以在“颜色”中指定不同的颜色，再单击“外边框”按钮，最后单击“确定”按钮即可。要设置含有旋转文本的选定单元格的样式，单击“格式→单元格”命令，选择“边框”选项卡，然后使用“预置”下的“外边框”和“内部”按钮，边框应用于单元格的边界，它会和文本旋转同样的角度。

6. vba 隐藏

1.点击鼠标右键，选择“新建”选项，然后点击“mircosoft office Excel 2007”选项新建一个Excel文件。

2.制作需要隐藏的相关表格。

3.选择界面上方的“开发工具”选项，然后点击“宏”选项。

4.写明VBA代码名称，然后点击“创建”按钮。

5.写入指定的VAB代码。作者这里需要隐藏表格中的2-4和9-11行。

6.点击插入一个按钮控件，并命名为“隐藏特定行”。

7.选中“隐藏特定行”控件，然后点击鼠标右键，选择“指定宏”。

8.将编写的代码指定至按钮控件上，然后点击“确定”按钮。

9.点击一次按钮控件，表格的特定行就自动隐藏完成了。

7. excelvba隐藏工作表

1.首先我们打开一个工作样表

2.隐藏行的方法很简单，在工作表的行序列上点击鼠标右键，选择隐藏行即可隐藏。但是这种方法需要自己去寻找索要隐藏单元格所在的行首。

3.使用vba则不需要这么麻烦，可以在任意选择单元格后，直接点击运行代码，则可以隐藏该单元格所在的行

4.我们使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：

Sub HideRow()

Dim iRow As Long

iRow = ActiveCell.Row

ActiveSheet.Rows(iRow).Hidden = True

ActiveSheet.Rows(iRow).Hidden = False

End Sub

5.我先将显示隐藏行取消，然后运行这段代码，刚才我们所处的是第10行，运行代码后。第10行被隐藏起来了。

6.单元格被隐藏，但是仍然可以选取。我们将代码中的注释符’去掉，重新运行代码，可以将10行重新显示。这里可以看到activesheet.rows(irow)是对象。hidden是方法，参数是true或false。true为隐藏。false为显示。

8. 隐藏工作表并设置密码vba

1、首先我们打开一个工作样表作为例子。

　　2、使用 alt+f11 组合键打开 vbe编辑器 ，新建一个模块，在模块编辑窗中输入以下代码：

　　Option Explicit

　　Sub 隐藏()

　　Dim i As Integer

　　For i = 1 To Sheets.Count

　　If Sheets(i).Name<> "源数据" Then

　　Sheets(i).Visible = 0

　　End If

　　Next x

　　End Sub

　　3、解读这段代码首先是要了解工作表的名称规则是默认的以数字顺序递增，按工作表的顺序依次是sheets1、sheets2、……直到最末尾一个工作表。 因此我们这里定义一个for循环，起始值为1，终值为工作表数 。

　　4、 接着我们对工作表名做判断 。工作表出了下标值，也就是上步提到的顺序命名，还可以自定义名称，也就是我们这里写的" 源数据 "。<>大于小于判断符为不等于。

　　5、visible属性是 可视属性 ，作为表格对象的属性即是可视或隐藏。这里写做0即是隐藏，我们可以用更直观的 写法false。

　　6、制作一个按钮并指定这个宏，我们运行一下，可以看到除了源数据工作表外，其他的工作表都隐藏起来了，如果需要回复，只需要将宏代码中visible的属性值0修改为1或者true然后运行即可

9. 隐藏Excel工作表

快来看看Excel中的隐藏功能，你知道几个？

1、隐藏单元格内容

首先选中想要隐藏内容的单元格，按住Ctrl+1，弹出单元格格式，点击“自定义”在类型中输入英文状态下的三个分号“;;;”，最后点击“确定”就可以了。

2、隐藏行列

隐藏列的快捷键：Ctrl+0

隐藏性的快捷键：Ctrl+9

3、隐藏窗口

点击视图选项卡，然后单击“窗口命令组”，勾选“隐藏”。

4、隐藏公式

选中公式所在的单元格，单击右键“设置单元格格式”选中“保护”，点击“隐藏”。接着点击菜单栏“审阅”，点击“保护工作表”。

5、隐藏错误值

利用函数公式：=IFERROR(原公式，返回错误时的指定值)

10. vba如何显示隐藏的模块

你要隐藏哪个工作就写哪个工作表

如

Subaa()

Sheets("sheet1").Visible=0

EndSub

这是隐藏sheet1这个工作表的，=2时尝试深度隐藏，=-1时显示工作表，=0时一般隐藏，可在工作表点右键取消隐藏，深度隐藏时，在工作表中不能取消隐藏。