Belirli Hücrelerin Makro ile Kilitlerini Açıp Kapatmak

[akhsahbaz]

Arkadaşlar,

Forumda arama sonucunda istediğim türde makroyu bulamadım. Hemen konuya giriyorum. Çalışmamda D,E,F,G ve L sütünlarında 11 ile 100 arasındaki satırları kilitli. Makro önce bu hücreleri açıp sonra kapatacak. Fakat ben bunu Sub şeklindeki makromun açma bölümünü önüne, tekrar kilitleme bölümünüde sonuna ekleyeceğim. Yardımlarınız için şimdiden teşekkür ederim.

 

[acolkesen1]

Sub() dan sonra
ActiveSheet.Unprotect
Range("hücre adresi").Select
Selection.Locked = False
Selection.FormulaHidden = False
Kendi kodlarınızdan sonra da
Range("hücre adresi").Select
Selection.Locked = True
Selection.FormulaHidden = False
ActiveSheet.Protect
yazarsanız sanırım istediğiniz olur.

 

[akhsahbaz]

Sn.acolkesen1 makro için teşekkür ederim. Elinize, emeğinize sağlık.

 

[acolkesen1]

Rica ederim, önemli değil, sadece foruma borçlarımı ödüyorum..