Macro help!!

P

Pam

The info below is the code I have for a worksheet where my
macro should prepare a new row at the bottom of the data
for input. For some reason it works ok the first time,
but the second time it repeats the same routine on the
same row, preventing the user to advance to a newly
formatted row. Help!

Range("A3").Select
Selection.End(xlDown).Select
Selection.Copy
Range("A63").Select
ActiveSheet.Paste
Range("E63").Select
Selection.End(xlUp).Select
Application.CutCopyMode = False
Selection.Copy
Range("E63").Select
ActiveSheet.Paste
Range("G63").Select
Selection.End(xlUp).Select
Application.CutCopyMode = False
Selection.Copy
Range("G63").Select
ActiveSheet.Paste
Range("H63").Select
Selection.End(xlUp).Select
Application.CutCopyMode = False
Selection.Copy
Range("H63").Select
ActiveSheet.Paste
Range("I63").Select
Application.CutCopyMode = False
ActiveWorkbook.Save
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top