excel kitabını şifreleme

[maxlas]

Herkese merhaba;
excel kitabıma şifreleme yapmak istiyorum.
Paylaşımlı ortak klasörde kitap içeriğini herkes görebilsin ama değişiklikleri sadece ben yapayım.

Yardımcı olabilecek varmı?
şimdiden teşekkür ederim.

 

[Emir Hüseyin Çoban]

. . .

Kullanıcı adı kodda tanımlı değilse tabloyu kaydetmez.

Kodları BuÇalışmaKitabı kısmına yapıştırın.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Application.UserName <> [COLOR="DarkRed"]"Hüseyin Çoban"[/COLOR] Then Cancel = True
End Sub
[COLOR="DarkGreen"]'UserName Öğrenmek için:
'MsgBox Application.UserName[/COLOR]

. . .

 

[maxlas]

excel kitabı içinde 4 ayrı sayfam var kesim dikim paket çarşaf olarak ben pek bilmediğim için yazdığınız kodu nereye ve nasıl yazıcam tarif te bulunsanız rica etsem ...
excel de yeniyim.

 

[maxlas]

çalışma kitabımda kesim dikim paket çaşaf olarak 4 sayfam var. yazdığınız kodu nasıl ve nereye yazmam gerekiyor tarif edebilir misiniz rica etsem. excel de yeniyim :/

 

[N.Faruk]

İlgili dosyanızı açın. Alt+F11 tuşlarına basın.
Daha sonra BuÇalışmaKitabı yazan kısma tıklayın. Yan taraftaki beyaz alana kodları yapıştırın.

Kolay gelsin.

 

[maxlas]

teşekkür ediyorum kodlarda değiştirmem gereken bi yer varmı acaba ? kırmızı renkli hüseyin çoban yazısı falan olduğu gibi mi yapıştırcam ? excel konusunda çok cahilim özür dilerim

 

[maxlas]

hocam bu kodların bi faydası olmadı sanırım. paylaşım klasörüne attım dosyamı kodlarıda dedğiniz gibi aktardım. ama paylaşımda klasörü gören herkes üzerinde değişiklik yapabiliyor

 

[Emir Hüseyin Çoban]

. . .

Belirttiğim alana değişiklik yapma yetkisi olan kullanıcının adı yazılacak.

Atladığımız kısım tüm bilgisayarlarda makrolar çalışır durumda olmalı.

Şöyle bir işlem yapsak. Tablo yapısı uygunsa, ortak alana tabloların PDF ye çevrilmiş halini otomatik atsak. Excel sadece yetkili kullanıcıda olsa.

. . .

 

[Emir Hüseyin Çoban]

. . .

Tablodaki tüm sayfaları şu şekilde korumaya alın.
Artık parolayı bilmeyenler değişiklik yapamayacaktır...

Ekran Görüntüsü (GİF) :

. . .

 

[maxlas]

HÜSEYİN HOCAM teşekkür ediyorum 2. vermiş olduğunuz bilgi tam istediğimi karşıladı. Emeğinize sağlık sağolun.