E
eddie1
Newbie in troubles...
following VBA works with keyboard input only, but not if Target.Colum
= 3 contains a formula ....
HowTo ?
Thanks for your help
Sub Worksheet_Change(ByVal Target As Range)
If Target.Row > 2 And Target.Column = 3 Then
x = Cells(Rows.Count, "d").End(xlUp).Row + 1
Range("D" & x) = Range("C" & Target.Row)
End If
End Su
following VBA works with keyboard input only, but not if Target.Colum
= 3 contains a formula ....
HowTo ?
Thanks for your help
Sub Worksheet_Change(ByVal Target As Range)
If Target.Row > 2 And Target.Column = 3 Then
x = Cells(Rows.Count, "d").End(xlUp).Row + 1
Range("D" & x) = Range("C" & Target.Row)
End If
End Su