Hello All,

I am trying to write a piece of code that will replicate the CTRL + SHIFT + END shortcut keys and i am having difficulties.

Any Help would be greatly appreciated.

Cheers
Lee

Are you really trying to emulate the key-presses for some weird reason (in which case lookup 'sendkeys()'), or are you just looking for the VBA equivalent (which is 'range.SpecialCells(xlCellTypeLastCell)')?

Chris


There are two secrets to success in this world:
1. Never tell everything you know