Excel工作表的隱藏與保護

Question

請問:Excel活頁簿和別人共用,但是有一張工作表要隱藏且讓他人無法開啟,我用<格式><工作表><隱藏>以後,再用<工具><保護><保護活頁簿><設定密碼>如此, 當關閉Excel後再重新開啟,視窗卻只顯示一半且無法移動也無法更換到其他工作表,該如何克服?感謝!

我是要隱藏工作表且讓他人無法取消隱藏.

Answer 1

當在<保護活頁簿>內, 在<設定密碼>之前有二選項如下:
1. 結構
2. 視窗
只要不勾選視窗, 則視窗就不受影響了.

2006-04-03 09:30:51 補充：
xin,
設立隱藏工作表, 再用密碼保護活頁簿後, 就看不見了也打不開, 該如何複製已隱藏之工作表? 敬請教導詳細. 謝謝!

Answer 2

Visible 屬性

Sheets的Visible屬性
如果物件可見則為 True。對於圖表或工作表，本屬性可設定為 xlVeryHidden。這樣設定可隱藏該物件，要使該物件重新可見的唯一方法是將此屬性設定為 True （使用者無法使該物件可見）。可讀寫的 Boolean 資料型態或者 Long 資料型態。
VBA例子
'深度隱藏選定的工作表
Sub VeryHiddenSht()
Dim sht As Object
If Not IsShtSelected Then Exit Sub
On Error Resume Next
For Each sht In ActiveWindow.SelectedSheets
sht.Visible = xlVeryHidden
Next
If Err.Number <> 0 Then
MsgBox Err.Description & vbCrLf & "至少要有一個工作表顯示!", vbInformation, Split(ThisWorkbook.Name, ".")(0)
End If
End Sub
'是否有作用中工作表
Function IsShtSelected() As Boolean
If Not ActiveSheet Is Nothing Then IsShtSelected = True
End Function
此程式碼可以將選定的工作表深度隱藏
若不用VBA則可以隨便插入一個控件- [檢視] [工具列] [控制工具箱]
右鍵點選該控件, 再選 [屬性] , 跳出 [屬性] 視窗後再點任一儲存格會出現該工作表的屬性視窗, 將其中[Visible]屬性值改為2-xlSheetVeryHidden

2006-04-03 14:43:19 補充：
對不起忘記提供取消隱藏的代碼下面代碼可以將作用中工作簿的所有工作表顯示出來'顯示所有工作表Sub ShowAllShts() Dim sht As Object For Each sht In ActiveWorkbook.Sheets sht.Visible = True NextEnd Sub

Answer 3

Excel活頁簿無法隱藏工作表
只要複製工作表就無法隱藏
原工作表內容