F
Fellow
Jacob Skaria, you have helped me with this table a few times (see below) and
i hope you can help me again.
After testing i realised that the table was able to generate a new row
perfectly after entering data into the B column. However, if i were to go
back to change the data previously entered, a new row will appear. I now have
two blank rows. Is there any way i can limit adding new rows with only new
entries and therefore change existing data without adding a new row?
Thanks again for all your help.
"Hi again
Try the below modified one to suit your requirement
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A1:B20")) Is Nothing Then
If Target <> "" Then
Application.EnableEvents = False
If Range("A" & Target.Row) <> "" Then
Rows(Target.Row + 1).Insert
Range("A" & Target.Row + 1) = Range("A" & Target.Row)
End If
Application.EnableEvents = True
End If
End If
End Sub
i hope you can help me again.
After testing i realised that the table was able to generate a new row
perfectly after entering data into the B column. However, if i were to go
back to change the data previously entered, a new row will appear. I now have
two blank rows. Is there any way i can limit adding new rows with only new
entries and therefore change existing data without adding a new row?
Thanks again for all your help.
"Hi again
Try the below modified one to suit your requirement
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A1:B20")) Is Nothing Then
If Target <> "" Then
Application.EnableEvents = False
If Range("A" & Target.Row) <> "" Then
Rows(Target.Row + 1).Insert
Range("A" & Target.Row + 1) = Range("A" & Target.Row)
End If
Application.EnableEvents = True
End If
End If
End Sub