what could be a better way of writing these codes.
they worked but looked messy.
many many thanks
Private Sub CommandButton1_Click()
x = Val(InputBox("(1) = A (2) = B (3) = C (4) = D (5) = E", "Select Column to sort (1~5).."))
If x = 0 Then
Exit Sub
End If
If x < 1...