Ana içeriğe atla

Excel'de birden çok çalışma sayfasını aynı anda nasıl koruyabilirim?

Birden çok çalışma sayfası içeren bir çalışma kitabınız olduğunu ve şimdi tüm çalışma sayfalarını veya bazı belirli çalışma sayfalarını korumanız gerektiğini varsayarsak, normalde Excel'de, sayfayı tek tek Koru işlevi ile koruyabilirsiniz, ancak bu yöntem sıkıcıdır ve Korunması gereken çok sayıda yaprak varsa zaman alıcıdır. Excel'de birden çok sayfayı aynı anda hızlı ve kolay bir şekilde nasıl korursunuz?

Tüm sayfaları aynı anda VBA kodu ile koruyun

Kutools for Excel ile birden çok sayfayı aynı anda koruyun

Excel için kutools ile aynı anda birden fazla sayfanın korumasını kaldırın


ok mavi sağ balon Tüm sayfaları aynı anda VBA kodu ile koruyun

Aşağıdaki VBA kodu ile, aktif çalışma kitabının tüm sayfalarını aynı şifre ile aynı anda koruyabilirsiniz, şunu yapın:

1. Basılı tutun ALT + F11 anahtarlar ve açılır Uygulamalar için Microsoft Visual Basic pencere.

2. tıklayın Ekle > modülve aşağıdaki kodu Modül Penceresi.

VBA kodu: Bir çalışma kitabındaki tüm çalışma sayfalarını aynı anda koruyun:

Sub protect_all_sheets()
top: 
pass = InputBox("password?") 
repass = InputBox("Verify Password") 
If Not (pass = repass) Then 
MsgBox "you made a boo boo" 
Goto top 
End If 
For i = 1 To Worksheets.Count 
If Worksheets(i).ProtectContents = True Then Goto oops 
Next 
For Each s In ActiveWorkbook.Worksheets 
s.Protect Password:=pass 
Next 
Exit Sub 
oops: MsgBox "I think you have some sheets that are already protected. Please unprotect all sheets then running this Macro." 
End Sub

3. Daha sonra tuşuna basın. F5 kodu çalıştırmak için anahtar ve istem kutusuna korumalı sayfalar için şifre girin, ekran görüntüsüne bakın:

doc-protect-multiple-pages1-1

4. tıklayın OKve ardından parolayı onaylamak için parolayı tekrar girin.

doc-protect-multiple-pages2-2

5. Sonra tıklayın OKve tüm sayfalar aynı şifre ile korunmaktadır.


ok mavi sağ balon Kutools for Excel ile birden çok sayfayı aynı anda koruyun

Bazen, çalışma kitabınızdaki tüm sayfaları korumak istemezsiniz ve yalnızca bazı belirli sayfaları korumak istersiniz, bu durumda yukarıdaki kod çalışmayacaktır. Fakat Kutools for Excel'S Çalışma Sayfasını Koruyun yardımcı program sayesinde hem tüm sayfaları hem de belirli sayfaları hızlı ve kolay bir şekilde koruyabilirsiniz.

Kutools for Excel : 300'den fazla kullanışlı Excel eklentisi ile 60 günde sınırlama olmaksızın ücretsiz deneyin

Kurduktan sonra Kutools for Excellütfen aşağıdaki adımları uygulayın:

1. tıklayın Kutools Artı > Çalışma Sayfasını Koruyun, ekran görüntüsüne bakın:

2. In Çalışma Sayfasını Koruyun iletişim kutusunda, korunmasını istediğiniz sayfaları seçin. (Varsayılan olarak, mevcut çalışma kitabındaki tüm çalışma sayfaları kontrol edilir.) Ekran görüntüsüne bakın:

doc-protect-multiple-pages4-4

3. Ve tıklayın OKve ardından Çalışma Sayfasını Koru iletişim kutusuna parolayı yazıp onaylayın. Ekran görüntüsüne bakın:

doc-protect-multiple-pages5-5

4. Sonra tıklayın OK, seçilen çalışma sayfaları korunmuştur.

Bu özellik hakkında daha fazla bilgi edinmek için Çalışma Sayfasını Koru'ya tıklayın.


ok mavi sağ balon Excel için kutools ile aynı anda birden fazla sayfanın korumasını kaldırın

Bir çalışma kitabındaki birden çok korumalı çalışma sayfasının aynı anda korumasını nasıl kaldırabilirsiniz? Elbette, Kutools for Excel ayrıca sağlar Korumayı Kaldır Çalışma Sayfası bir kerede onları korumanız için yardımcı program.

Lütfen aşağıdaki adımları uygulayın:

1. Korumalı çalışma sayfalarını içeren çalışma kitabınızı açın.

2. Sonra tıklayın Kutools Artı > Korumayı Kaldır Çalışma Sayfası, ekran görüntüsüne bakın:

3. In Korumayı Kaldır Çalışma Sayfası iletişim kutusunda, korumalı sayfalar liste kutusunda listelenir, ardından Ok düğmesi, ekran görüntüsüne bakın:

doc-protect-multiple-pages7-7

4. Ve sonra a Korumayı Kaldır Çalışma Sayfası Çalışma sayfalarını korumak için oluşturduğunuz şifreyi girmenizi hatırlatmak için iletişim kutusu açılır, ekran görüntüsüne bakın:

doc-protect-multiple-pages8-8

5. Parolayı yazdıktan sonra tıklayın Okliste kutusundaki tüm işaretli çalışma sayfaları korumasızdır.

Not: Çalışma sayfaları aynı parolaya sahip olmalıdır.

Bu Korumayı Kaldırma Çalışma Sayfası özelliği hakkında daha fazla bilgi için.

Kutools for Excel'i şimdi indirin ve ücretsiz deneyin!


ok mavi sağ balon Demo: Kutools for Excel ile tüm çalışma sayfalarını aynı anda koruyun veya korumasını kaldırın

Kutools for Excel: 300'den fazla kullanışlı Excel eklentisi ile 30 günde sınırlama olmaksızın ücretsiz deneyin. Hemen indirin ve ücretsiz deneme!

İlgili makale:

Excel'de aynı anda birden çok çalışma sayfasını nasıl kaldırabilirim?

En İyi Ofis Üretkenlik Araçları

🤖 Kutools AI Yardımcısı: Aşağıdakilere dayalı olarak veri analizinde devrim yaratın: Akıllı Yürütme   |  Kodunu oluşturun  |  Özel Formüller Oluşturun  |  Verileri Analiz Edin ve Grafikler Oluşturun  |  Kutools İşlevlerini Çağır...
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya Tanımla   |  Boş Satırları Sil   |  Veri Kaybı Olmadan Sütunları veya Hücreleri Birleştirin   |   Formülsüz Tur ...
Süper Arama: Çoklu Ölçütlü VLookup    Çoklu Değer VLookup  |   Birden Çok Sayfada VLookup   |   Bulanık Arama ....
Gelişmiş Açılır Liste: Hızla Açılır Liste Oluşturun   |  Bağımlı Açılır Liste   |  Çoklu Seçim Açılır Liste ....
Sütun Yöneticisi: Belirli Sayıda Sütun Ekleme  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştırın ...
Öne Çıkan Özellikler: Izgara Odağı   |  Tasarım görünümü   |   Büyük Formül Çubuğu    Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynak Kütüphanesi (Otomatik metin)   |  Tarih Seçici   |  Çalışma Sayfalarını Birleştirin   |  Hücreleri Şifrele/Şifresini Çöz    E-postaları Listeye Göre Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtre...) ...
En İyi 15 Araç Seti12 Metin Tools (Metin ekle, Karakterleri Kaldır, ...)   |   50+ Grafik Türleri (Gantt şeması, ...)   |   40+ Pratik Formüller (Yaşı doğum gününe göre hesapla, ...)   |   19 sokma Tools (QR Kodunu Girin, Yoldan Resim Ekle, ...)   |   12 Dönüştürme Tools (Sayılardan Kelimelere, Para Birimi Dönüştürme, ...)   |   7 Birleştir ve Böl Tools (Gelişmiş Kombine Satırları, Bölünmüş hücreler, ...)   |   ... ve dahası

Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar.  En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...

Açıklama


Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir

  • Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
  • Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
  • Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
Comments (21)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I am trying to use this in a shared workbook but I get a Microsoft Visual Basic error "Run-time error '1004": Application-defined or object-defined error" I am just looking for suggestions on how to get around this. Any help would be appreciated
This comment was minimized by the moderator on the site
Occurs when sheet is already locked
This comment was minimized by the moderator on the site
Thanks for the wonder full tool to protect & unprotect all the sheets at a time. Please guide me I am able to unprotect all sheets in my work book at a time but when I run protect all sheets VBA Code then only first 4 sheets are protected & rest or left unprotected. Please help me to sort out the issue.
This comment was minimized by the moderator on the site
How do I mask the password using the VBA method? I can not find this information via google or F1 help files. Thanks in advance!
This comment was minimized by the moderator on the site
Hi I used this code now I it wont accept my password to get back into my spreadsheet !!
This comment was minimized by the moderator on the site
I have chart tabs and worksheets in my Excel 2013 workbook. The VBA coding above works for the protecting the worksheets but not the separate chart tabs. How do i password protect the multiple chart tabs and multiple worksheets in my workbook? Thanks!
This comment was minimized by the moderator on the site
Hey, I need some help, the above code was very helpful, but it locks the sort (auto filter as well) can you please provide code to solve that problem and also where it would be inserted. Thank you in advance.
This comment was minimized by the moderator on the site
Thank you! This is awesome, I was even able to modify the VBA code so that I could unprotect all sheets at once! :) Sub unprotect_all_sheets() top: pass = InputBox("password?") repass = InputBox("Verify Password") If Not (pass = repass) Then MsgBox "you made a boo boo" GoTo top End If For i = 1 To Worksheets.Count Next For Each s In ActiveWorkbook.Worksheets s.Unprotect Password:=pass Next Exit Sub oops: MsgBox "I think you have some sheets that are already protected. Please unprotect all sheets B4 running this Macro." End Sub
This comment was minimized by the moderator on the site
when i activated this VBA, hyperlink doesn't work. how can i make them work? tnx :)
This comment was minimized by the moderator on the site
I am suddenly having the 1004 error as well. Anyone find a solution?
This comment was minimized by the moderator on the site
I'm suddenly having the error 1004 issue. Have been using the macro for months now it randomly fails.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations