Thread: VBA - With Range Selected, how to back up one row?

Please excuse me for I am very new at this. I dont know the code lanuage on how to do it.

My goal is to automate with a macro, these stroke combinations. (the macro recorder is not working the way I need it to).

If I was using keyboard short cuts =
1) Select H117 on Sheet7
2) ctrl + shirt + down arrow
3) shift + up arrow

I currently have (and I know its WRONG)...

Sub Macro6()
'
' Macro6 Macro
'

'
    Range("H117").Select
    Range(Selection, Selection.End(xlDown)).Select
    With Selection
        .Range(ActiveCell, ActiveCell.Offset(-1, 0)).Select
    End With
End Sub

Any help is greatly appreciated. Thanks in advance.