成语| 古诗大全| 教学资源| 作文| 扒知识| 扒知识繁体

當前位置:首页 > 趣味生活

excel工作表批量取消隱藏

Q1:excel2013如何批量取消隱藏工作表?

第一步、打開你的工作簿(自然,這個工作簿隱藏了很多個工作表的,你想一次性顯示他們)。
第二步、按ALT+F11(或者點擊工具-宏-Visual Basic編輯器),出現vb編輯器界面。看左邊,有兩個框里都有英文字母,看上邊一個框里(下面的那個框框不管它)。拉動滾動條,看這個框的最上邊,就是你當前文件的名稱,實際它的下面就是若干個工作表的名稱。
第三步、隨意雙擊一個工作表,就會在右邊黑乎乎的窗口里出現一個小窗口。這個窗口的標題就是你的文件名。我們現在就要在這個小窗口里寫段代碼。寫什麼呢?看第四步。
第四步、在這個窗口的空白處輸入一組代碼。代碼如下:復制進去即可
Sub quxiao()
For Each i In Sheets
i.Visible = -1
Next
End Sub
第五步、Alt+F11回到Excel ,
第六步、Alt+F8,找到quxiao宏,選中,點擊執行,ok,都顯示了,保存一下即可。

Q2:excel中如何批量取消隱藏的工作表

打開VB編輯器,將下面代碼復制進去,執行即可。
Sub UnhideAllSheets()
For Each Sheet In ActiveWorkbook.Sheets
Sheet.Visible = True
Next
End Sub

Q3:excel中隱藏的多個工作表怎麼快速取消隱藏?

使用VBA
按ALT+F11進入VBA界面,按Alt+i+m插入模塊
粘貼下面的代碼後按F5即可取消所有工作表的隱藏。
Sub allvisible()
Dim s As Worksheet
For Each s In ThisWorkbook.Worksheets
s.Visible = xlSheetVisible
Next s
End Sub

Q4:Excel如何批量取消隱藏,即讓整個工作表里的(表格的 行列)取消隱藏

Ctrl+A再右鍵取消隱藏就行了。

Q5:excel中怎樣批量取消隱藏工作表?

在工作表標簽上單擊右鍵
查找代碼
代碼窗口粘貼下面的VBA代碼
sub 取消隱藏
for each sh in worksheets
sh.visible=true
next
end sub
然後按F5執行代碼

猜你喜歡

更多