AccessTr.neT
excelde tüm sayfalara aynı anda koruma koyma - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: excelde tüm sayfalara aynı anda koruma koyma (/konu-excelde-tum-sayfalara-ayni-anda-koruma-koyma.html)



excelde tüm sayfalara aynı anda koruma koyma - axtmm - 09/10/2013

excel sayfasındaki tüm sayfaları seçip tek seferde koruma koyma nasıl yapa bilirim

örnek ektedir.
saygılarımla...


Cvp: excelde tüm sayfalara aynı anda koruma koyma - ogulcan92 - 09/10/2013

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



Cvp: excelde tüm sayfalara aynı anda koruma koyma - axtmm - 09/10/2013

hocam teşekkürler


Cvp: excelde tüm sayfalara aynı anda koruma koyma - ogulcan92 - 09/10/2013

Rica ederim.