線上遊戲排行榜2013/2014,進擊的巨人線上看,candy crush saga外掛,正妹寫真三圍

如題
請問如何設定保護工作表之後,其中的群組跟大綱功能不受到限制,仍可以縮放??

在網路上找了好久的文章
是要用VB程式

VB打進去之後
當下確實可以保護工作表且群組跟大綱功能不受到限制

但是存檔成巨集檔案後
再打開又都被保護起來~顯示文件被保護~所以群組跟大綱又不能縮放了

有試過以下這兩個VB
這兩個VB分別當下修改完成之後都有我想要的效果
但檔案存檔完成後再打開又都被限制住了
1.
sub 限度保護()
ActiveSheet.EnableOutlining = True
ActiveSheet.Protect contents:=True, userInterfaceOnly:=True
end sub

2.
Private Sub Workbook_Open()

Sheets("sheet1").Select '工作薄打開時，先選擇sheet1

Sheets("sheet3").Select

End Sub

Private Sub Worksheet_Activate()

ActiveSheet.Protect Password:="1234", userInterFaceonly:=True '保護工作表

ActiveSheet.EnableAutoFilter = True '自動篩選有效

ActiveSheet.EnableOutlining = True '分組顯示有效

End Sub

Private Sub Worksheet_Deactivate()

ActiveSheet.Unprotect Password:="1234"

End Sub

請問有什麼解決方法~讓工作表受保護後~群組跟大綱永遠都可以縮放

請懂得人幫幫忙~謝謝

This entry passed through the Full-Text RSS service - if this is your content and you're reading it on someone else's site, please read the FAQ at fivefilters.org/content-only/faq.php#publishers.