- Katılım
- 6 Aralık 2007
- Mesajlar
- 135
- Excel Vers. ve Dili
- Office 2003
Arkadaşlar binbir emek vererek bir dosya oluşturdum. Herşey bitti sayfaya koruma koydum. Fakat "KAYDIR" komutu kullandığım sayfada açılan listeden yeni bir satır seçtiğim zaman sayfa korumalı olduğu için bilgiler değişmiyor. Ama korumayı iptal ettiğim zaman listeden seçtiğim kişiye göre bilgiler değişiyor.
Ama formüllerin bozulmaması için sayfayada koruma koymak zorundayım. Aktif Hücrelerin renk değiştirmesi için
ActiveSheet.Unprotect Password:=""
If Intersect(Target, [a1:s203]) Is Nothing Then: [a3:a2000].Interior.ColorIndex = 0: Exit Sub
[a1:s203].Interior.ColorIndex = 1
ActiveCell.Interior.ColorIndex = 9
ActiveSheet.Protect Password:=""
komutunu yazdığım zaman şifreyi iptal edip renk değiştirince tekrar sayfaya şifre veriliyordu.
Acaba bu sorundada bunun gibi bir çözüm yolu varmı. Lütfen yardımlarınızı bekliyorum
Ama formüllerin bozulmaması için sayfayada koruma koymak zorundayım. Aktif Hücrelerin renk değiştirmesi için
ActiveSheet.Unprotect Password:=""
If Intersect(Target, [a1:s203]) Is Nothing Then: [a3:a2000].Interior.ColorIndex = 0: Exit Sub
[a1:s203].Interior.ColorIndex = 1
ActiveCell.Interior.ColorIndex = 9
ActiveSheet.Protect Password:=""
komutunu yazdığım zaman şifreyi iptal edip renk değiştirince tekrar sayfaya şifre veriliyordu.
Acaba bu sorundada bunun gibi bir çözüm yolu varmı. Lütfen yardımlarınızı bekliyorum
Son düzenleme: