Select a range from active cell to last non blank row

Hi,
I want to copy data from active cell to last non blank cell and paste it to last blank cell in same column,

For example
I active cell is G45 and last non blank cell is G57 the copy the range g45:g57 and paste to g58

Hope some one will help

Admittedly late, but since I have already written ...

1. Select the selected cell (e.g. G45)
2. Start macro recording (Record macro icon). In the "Record a macro" window, in the "Store macro in" field, select "this workbook". Press [OK].
3. Complete the following steps:
- Shift + End
- Shift + Down Arrow
- Ctrl + C
- Down Arrow
- Ctrl + V
- Esc
4. End macro recording.
5. Select the LeftAlt + F11 keyboard shortcut and locate the recorded macro. You'll probably find them in Module1.
6. In this procedure, you will find the line

Please Login or Register  to view this content.

Replace it with

Please Login or Register  to view this content.

7. From now on you can use selecting the LeftAlt + F8 keyboard shortcut in Excel.

Artik