23-03-2020, 17:16
Visual Basic
- Private Sub Worksheet_SelectionChange(ByVal Target As Range)
- ActiveCell.Select
- If Target.HasFormula Then
- Target.Offset(, 1).Activate
- End If
- End Sub
Merhaba Arkadaşlar eklediğim kod ile formüllü hücreleri koruyorum. Tek hücreyi veya tek sütundaki hücreleri silmemi engelliyor. Birden fazla sütunu seçtiğim zaman formüllü kodların silinmesine izin veriyor. Çoklu sütunlerdeki formüllü kodları seçtiğim zaman da kodlu hücreleri silmeme izin vermesin. Bu konuda yardımlarınıza ihtiyacım var yardımlarınız için şimdiden teşekkürler.