Copy & paste 2 anthr sheet-same wrkbook-next empty row
Posted by sam patrick on January 24, 2002 9:07 AM
I hope someone can help-I don't think it's a hard macro
In any row on Sheet1, if "y" is entered into column AU, then contents of A(same row) AND B(same row) are copied to Sheet2 in the next open row.
Can anyone help -- I am having no luck
Thank you,
Sam Patrick
Posted by Juan Pablo G. on January 24, 2002 9:30 AM
Is this it ?
It goes in the Sheet's module, not in a regular one.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 47 and Target = "y" Then
Cells(Target.Row, 1).Resize(1, 2).Copy Sheets("Sheet2").Range("A65536").End(xlUp).Offset(1)
End If
End Sub
Juan Pablo G.
Posted by Sam Patrick on January 24, 2002 9:54 AM
It didn't do anything...
--What did you mean by in sheet's module, not in regular one? I wne to the first sheet(in editor) and right clicked,then went to view code. pasted it under worksheet(left) & change(right)
I think this is correct..??
Posted by Juan Pablo G. on January 24, 2002 11:15 AM
Re: It didn't do anything...
Did you tried writting a "y" to Column AU ?
Juan Pablo G.
Posted by Sam Patrick on January 24, 2002 11:24 AM
All ok, Thanks
