(01/06/2021, 18:13)m_demir yazdı: eklediğiniz konu hangi kodun altına eklemem gerekiyorIf Intersect(Target, Union(Range("A3
" & Rows.Count), Range("F3:i" & Rows.Count))) Is Nothing Then Exit Sub bunu silip onu elemelisiniz sadece.Yada değiştirebilirsiniz ordaki harfleri.