get column letter

[mvidas]

Gibbo,

I agree with shades, you can just use Cells and not even bother using the column letter.

Dim C As Long
 For C = 2 To 20 Step 2
   Range(Cells(4, C), Cells(34, C + 1)).Sort Key1:=Cells(4, C), Header:=xlNo
 Next

Though named ranges is a good way to do it as well.
Matt