hücre koruma

Katılım
16 Haziran 2007
Mesajlar
32
Excel Vers. ve Dili
2003
Bir excel sayfasinda sadece bazi hucreleri korumak (ancak sifre ile girilebilsin) mumkun mu?

Tsk
 

fedeal

Banned
Katılım
29 Mayıs 2008
Mesajlar
1,985
Excel Vers. ve Dili
2003 tr
hücrelerin hepsi seçilir sag tıklanır hücreleri biçimlerdir-koruma-kitli ve gizli secenegi iptal edilir (yani işaretler silinir) cıkılır.kitlenmesi isenilen hücreler secilir tekrar sagtıklanır hücreleri biçimlerdir-koruma-kitli tıklanır formüller görünmesin istersen gizliyide tıklayıp --- araçlar koruma sayfa koru şifre gir tekrar şifre gir bukadar.
 

N.Ziya Hiçdurmaz

Özel Üye
Katılım
28 Nisan 2007
Mesajlar
2,218
Excel Vers. ve Dili
Office 2013 TR / 32 Bit
Yanıt

Kod:
Sub KORU()
Dim DEG As String
On Error Resume Next
ActiveSheet.Unprotect 123
Cells.Locked = False
DEG = InputBox("korunacak alanı seçiniz")
Range(DEG).Locked = True
ActiveSheet.Protect 123
End Sub
Kod:
Sub KORUAC()
Dim DEG As String
ActiveSheet.Unprotect 123
DEG = InputBox("Şifrenizi giriniz")
If DEG <> 123 Then GoTo ATLA
Cells.Locked = False
ATLA:
ActiveSheet.Protect 123
End Sub
 
Üst