Excel Macro Help Please

[nfrazer]

I'm having a brain drain - I'm trying to record a macro where I'd like to copy from one row (at the top of the spreadsheet) and paste the value on the next available row in the spreadsheet. I tried Ctrl End, Home, and then arrow down, but it then always goes to the same row and overwrites what was there. Thank you!!!!

 

[nfrazer]

The range is A5:AA5. I've used the macro you suggested and it works except that it doesn't paste it as values. It gives me the same formulas as what was on row 5. How do I paste it as values?

 

[GTO]

As Nalani points out, this will check Column A to see where the last row with data is. If there may be blank cells, you may want to use the .Find Method.

If there are not blank cells in the data, try:

Option Explicit
    
Sub exa()
    With ThisWorkbook.Worksheets("Sheet1") '<---or just use the sheet's codename
        .Cells(.Rows.Count, "A").End(xlUp).Offset(1).Resize(, 27).Value = .Range("A5:AA5").Value
    End With
End Sub

Hope that helps,

Mark