Hello there,
After reading one of your old posts - http://www.excelforum.com/excel-prog...refreshes.html - you've managed to help me out. I used your solution in post #11.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim LC as Long
LC = Cells(1, Columns.Count).End(xlToLeft).Column
If Not Intersect(Target, Range("A1:A10")) Is Nothing Then
Application.EnableEvents = False
Range("A1:A10").Copy Cells(1, LC + 1)
Application.EnableEvents = True
End If
End Sub
My question to you is; Instead of copying the old information to the right in the next column...is it possible to copy the old information below, to the next available row? So all information appears in the same column?
I'm not sure how to write the code for that.
Your help would be greatly appreciated.
Thanks,
Blake
Bookmarks