automated copy in table

Hello, I have a macro where at one point I need to copy the same value in one column of a table. This is to be used on a number of tables but they will vary in how many rows they have.

I'm using the code;

 Range("C5").Select
   Selection.Copy
   Range(Selection, Selection.End(xlDown)).Select
   ActiveSheet.Paste

This works fine for all tables except ones that only have one row ie. in some cases the value in C5 does not need to be copied down as there are no more rows in the table. At the moment the macro will copy the value in C5 to all the cells in column C to the bottom of the Worksheet.

is there any way to avoid this?

many thanks
Liam