marreco
01-28-2012, 04:34 AM
I would like the code below only works in cells, "L6" and "M6".
This is to leave the other free cells without the action of the code that's possible?
I'm try ...but dont work:think:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target <> Range("L6") And Range("M6") Then Exit Sub
If Target.Cells.Count <> 1 Then Exit Sub
Change.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0) = Target.Value
End Sub
This is to leave the other free cells without the action of the code that's possible?
I'm try ...but dont work:think:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target <> Range("L6") And Range("M6") Then Exit Sub
If Target.Cells.Count <> 1 Then Exit Sub
Change.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0) = Target.Value
End Sub