Code: Select all
Private Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
With Me.MSFlexGrid1
Static blAscending As Boolean
If Button = vbLeftButton Then
If .Row = 1 And .ColSel = 0 Then
If Not blAscending Then
.Sort = flexSortNumericAscending
blAscending = True
Else
.Sort = flexSortNumericDescending
blAscending = False
End If
End If
End If
End With
End Sub
but i need to sort also the column 51 or 52 or 53
how to modify this code?
select case statement?
note:
all columns have only number value