excel sayfasındaki tüm sayfaları seçip tek seferde koruma koyma nasıl yapa bilirim
örnek ektedir.
saygılarımla...
Sn:axtmm
Aşağıdaki kodları butona yazınız fakat tüm sayfaları korumanın sıkıntılarınada kadlanmanız gerekir.
Private Sub CommandButton2_Click()
For Each Worksheet In ActiveWorkbook.Worksheets
If Worksheet.Name <> "Sayfa1" And Worksheet.Name <> "Sayfa190" Then
Worksheet.Protect Password:="Bu Kısma Şifre Yazınız"
End If
Next
End Sub