Biçimlendirme kilidi koyma ( Hücre içeriğine giriş yapılabilir biçimlendirme değiştirilemez)

[bayhekim81]

İki tablodan oluşan bir excell sayfam var. Birinci tablo her türlü değişikliğe kilitliyken, ikinci tablonun sadece biçimlendirmeye karşı kilitli olmasını istiyorum. Yani hücreler arasında sürükle-bırak yada kopyala yapıştır yapınca sadece içerik değişsin, biçimlendirme değişmesin.

 

[u.L.a.s]

O sayfanın vba kod düzeneği içerisine aşağıdaki kod düzeneği gibi bir şey olması gerekiyor. ben burada A1:B2 hücre aralığını örnek verdim sen bunu sayfanda ilgili hücre aralıklarına göre nasıl bir formatta olması gerekiyıorsa kod üstünde değişiklikler yaparak uygulayacaksın.

Private Sub Worksheet_Change(ByVal Target As Range)
Range("A1:B2").Interior.Color = RGB(204, 229, 244) 'hücre içi rengi
Range("A1:B2").Borders.LineStyle = xlDash 'hücre çerçeve düzeneği
Range("A1:B2").Font.Bold = True 'font kalın italic veya normal olma durumu
Range("A1:B2").Font.Color = vbRed 'yazılı olan fontun rengi
Range("A1:B2").HorizontalAlignment = xlLeft 'Yazılı olan içeriğin sağa sola dayalı olması veya ortalı olma durumunu belirleme
Range("A1:B2").Font.Size = 8 'Yazılı olan yazının font büyüklüğü
End Sub