Dim ws As Worksheet
ActiveWorkbook.Unprotect
For Each ws In Worksheets
ws.Visible = xlSheetVisible
Next
End Subşu kod ile sayfaları gizleyebiliyoruz ama
Notice that we first unprotect the workbook, just in case it was password protected.
(Parola korumalı olması durumunda öncelikle çalışma kitabının korumasını kaldırdığımıza dikkat edin). demiş
şifreli halde gizleyemez miyiz