excel sayfasındaki tüm sayfaları seçip tek seferde koruma koyma nasıl yapa bilirim
örnek ektedir.
saygılarımla...
excelde tüm sayfalara aynı anda koruma koyma
Sn:axtmm
Aşağıdaki kodları butona yazınız fakat tüm sayfaları korumanın sıkıntılarınada kadlanmanız gerekir.
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
hocam teşekkürler
Rica ederim.
Konuyu Okuyanlar: 1 Ziyaretçi