Code:
' Turn of error handling as there's a chance that we will try to
' select a cell off the left of the sheet
On Error Resume Next
' Increase the selection by one column left, twice
Range(Selection.Cells(1, 1).Offset(0, -1), Selection).Select
Range(Selection.Cells(1, 1).Offset(0, -1), Selection).Select
' Switch on normal error handling again
On Error GoTo 0