Birden çok sayfayı koruma

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Birden çok sayfayı koruma

İleti#1)  sevyanli23 » 14 Oca 2022 22:59

Selamün Aleyküm İyi akşamlar.
Excel'de Birden Çok Çalışma Sayfasını Aynı Anda Nasıl Koruyabilirim?
Bununla ilgili bilgisi olan yardımcı olursa sevinirim.
Kullanıcı avatarı
sevyanli23
Yeni Başlamış
 
Kayıt: 03 Kas 2014 06:42
Meslek: Elektrik teknisyeni
Yaş: 44
İleti: 59
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İSTANBUL/SULTANGAZİ

Yıllık Maaş Bordrosu Hesaplama 2022

Cevap: Birden çok sayfayı koruma

İleti#2)  yusuf43 » 14 Oca 2022 23:51

Kod: Tümünü seç
Sub tümsayfalarıkoru()
git:
gec = InputBox("parola?")
tekrargec = InputBox("Şifreyi Doğrula")
If Not (gec = tekrargec) Then
MsgBox "Tamam"
GoTo git
End If
For i = 1 To Worksheets.Count
If Worksheets(i).ProtectContents = True Then GoTo basla
Next
For Each s In ActiveWorkbook.Worksheets
s.Protect Password:=gec
Next
Exit Sub
basla: MsgBox "Lütfen bu Makroyu çalıştırdıktan sonra tüm sayfaların korumasını kaldırın."
End Sub


Çalışma sayfasını aç geliştiriciye gir bir modül oluştur. Bu kodu modülün içine yapıştır. Sonra F5' e bas parola soracak parolanı yaz sonra doğrulama soracak tekrar parolayı yaz. Sonra tüm sayfalar aynı anda korunur. örnek dosyada ekliyorum. Kolay gelsin.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
yusuf43
Siteye Alışmış
 
Kayıt: 19 May 2021 12:00
Meslek: EV HANIMI
Yaş: 45
İleti: 295
 
Cinsiyet: Bayan
Bulunduğunuz İl / Semt: KÜTAHYA

Cevap: Cevap: Birden çok sayfayı koruma

İleti#3)  sevyanli23 » 15 Oca 2022 18:12

yusuf43 yazdı:
Kod: Tümünü seç
Sub tümsayfalarıkoru()
git:
gec = InputBox("parola?")
tekrargec = InputBox("Şifreyi Doğrula")
If Not (gec = tekrargec) Then
MsgBox "Tamam"
GoTo git
End If
For i = 1 To Worksheets.Count
If Worksheets(i).ProtectContents = True Then GoTo basla
Next
For Each s In ActiveWorkbook.Worksheets
s.Protect Password:=gec
Next
Exit Sub
basla: MsgBox "Lütfen bu Makroyu çalıştırdıktan sonra tüm sayfaların korumasını kaldırın."
End Sub


Çalışma sayfasını aç geliştiriciye gir bir modül oluştur. Bu kodu modülün içine yapıştır. Sonra F5' e bas parola soracak parolanı yaz sonra doğrulama soracak tekrar parolayı yaz. Sonra tüm sayfalar aynı anda korunur. örnek dosyada ekliyorum. Kolay gelsin.


Teşekkürler ilginize
ben beceremedim herhalde
Kullanıcı avatarı
sevyanli23
Yeni Başlamış
 
Kayıt: 03 Kas 2014 06:42
Meslek: Elektrik teknisyeni
Yaş: 44
İleti: 59
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İSTANBUL/SULTANGAZİ

Cevap: Birden çok sayfayı koruma

İleti#4)  yusuf43 » 15 Oca 2022 18:18

Dosyanızı yüklerseniz yardımcı olurum.
Kullanıcı avatarı
yusuf43
Siteye Alışmış
 
Kayıt: 19 May 2021 12:00
Meslek: EV HANIMI
Yaş: 45
İleti: 295
 
Cinsiyet: Bayan
Bulunduğunuz İl / Semt: KÜTAHYA

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Birden çok sayfayı koruma

İleti#5)  matrax410 » 15 Oca 2022 18:20

merhaba hocam ,

benim de işime yarayacak bir formül. İlave olarak şunu sormak istiyorum .

korumayı kaldırıp , işlemlerimizi bitirdikten sonra tekrar tüm sayfaları aynı anda koruma altına nasıl alabiliriz.

şimdiden çok teşekkürler,
selamlar,
önder
Kullanıcı avatarı
matrax410
Siteye Alışmış
 
Kayıt: 29 Haz 2018 01:10
Meslek: TEKteknisyen
Yaş: 47
İleti: 129
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: kocaeli

Cevap: Birden çok sayfayı koruma

İleti#6)  sevyanli23 » 15 Oca 2022 19:23

Cümleten iyi akşamlar
ben derdimi şöyle anlatayım. Excel sayfasında formüllü hücreleri korumak için yaptığım adımları sıralayayım:
Giriş, Bul ve seç (özel git), formülleri tıkla, tamam dedikten sonra. Sayfadaki formüllü alanlar kendiliğinden seçiliyor zaten.
Sağ tıklayıp , hücreleri biçimlendiri seç, koruma sekmesinden gizleyi tıkla, tamam dedikten sonra, Gözden geçirde Sayfayı Koru seç ve şifre girdikten sonra formüllü alanlar korunmuş oluyor. Bunu tek tek her sayfa için değilde, çoklu birden fazla sayfa için nasıl yapabilirim. Yardımcı olursanız sevinirim. Teşekkürler
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
sevyanli23
Yeni Başlamış
 
Kayıt: 03 Kas 2014 06:42
Meslek: Elektrik teknisyeni
Yaş: 44
İleti: 59
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İSTANBUL/SULTANGAZİ

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Birden çok sayfayı koruma

İleti#7)  yusuf43 » 16 Oca 2022 00:03

Sayın matrax410 korumayı kaldırıp , işlemlerimizi bitirdikten sonra tekrar modüle gidip F5 e basın parolayı yazın tüm sayfalar korunur.
Kullanıcı avatarı
yusuf43
Siteye Alışmış
 
Kayıt: 19 May 2021 12:00
Meslek: EV HANIMI
Yaş: 45
İleti: 295
 
Cinsiyet: Bayan
Bulunduğunuz İl / Semt: KÜTAHYA

Cevap: Birden çok sayfayı koruma

İleti#8)  yusuf43 » 16 Oca 2022 00:16

Sayın sevyanli23 gönderdiğim kod tüm sayfaları aynı anda korumaya alıyor fakat sizin sayfalarda denedim sayfaları korumaya alıyor ancak formül alanlarına müdahale edebiliyorum. Sayfalar korumalı olduğu halde işlem yapıyor nedenini anlamadım. Başka dosya üzerinde denedim orada sıkıntı yok ama sizin sayfalarda sıkıntı var nedenini bulamadım.
Kullanıcı avatarı
yusuf43
Siteye Alışmış
 
Kayıt: 19 May 2021 12:00
Meslek: EV HANIMI
Yaş: 45
İleti: 295
 
Cinsiyet: Bayan
Bulunduğunuz İl / Semt: KÜTAHYA

Cevap: Birden çok sayfayı koruma

İleti#9)  matrax410 » 16 Oca 2022 01:01

Yusuf hocam merhaba,

çok teşekkür ederim.

selamlar,
Kullanıcı avatarı
matrax410
Siteye Alışmış
 
Kayıt: 29 Haz 2018 01:10
Meslek: TEKteknisyen
Yaş: 47
İleti: 129
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: kocaeli


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 1 misafir

Bumerang - Yazarkafe