Paste in the next empty cell starting at a specific cell

I need to copy a line and paste it in the next empty cell. I will be using this macro to copy and paste several lines.

I have seen a lot of examples pasting it the next cell. But what makes mine different is, I need it to paste it in the next empty cell after a specific cell. Example: I need to paste it to the next empty cell after A31.

This is what I have so far for the copy and paste.

Sub weekday()

Range("A3:E3").Select
Selection.Copy
Range("A51").Select
ActiveSheet.Paste
End Sub

I am VERY new at this so simple is better for me.

Thanks for you help.

Wayne555,

Welcome to the Excel Forum.

Try either of the following two macros.


Please TEST this FIRST in a COPY of your workbook (always make a backup copy before trying new code, you never know what you might lose).

Please Login or Register  to view this content.

Wayne555,


Thanks for the additional information.


Please TEST this FIRST in a COPY of your workbook (always make a backup copy before trying new code, you never know what you might lose).

Please Login or Register  to view this content.

Then run the "weekdayV3" macro.

Wayne555,

You are very welcome.

Hopefully I will be able to give help on this site one day!

Practice, practice,.....


If your post has been solved, please click EDIT in your original post, click GO ADVANCED and set the PREFIX box to SOLVED.