VBA Tüm Worksheet'leri Şifrelemek

33 Okunma VBA

VBA ile çalıştığınız tüm "worksheet" leri şifreleyip koruma altına almak istiyorsanız, aşağıdaki macro kodunu kullanabilirsiniz.. 

Sub Sifrele() 
   Dim ws As Worksheet 
   Dim password As String 
   password = "Test123"
   For Each ws In Worksheets 
    ws.Protect password:=password 
   Next ws 
End Sub
VBA

İlginizi Çekebilir

VBA 1'den N'e Kadar Asal Sayıları Bulma Örneği

VBA Bir Stringdeki Her Karakterin Sayısını Bulma Örneği

VBA Bir Dictionary'i Filtreleyip Yeni Bir Dictionary Yaratma Örne ...

VBA Dizinin İlk ve Son Elemanının Aynı Olup Olmamasını Bulma Örne ...

VBA Dosya Taşıma