You can't do this in datasheet view, but you can create a continuous form
that *looks* like datasheet view. Then, in the header section, you can
assign event procedures to the Click events of the header labels. For
example:
Private Sub lblHdrSurname_Click()
Me.OrderBy = "Surname"
Me.OrderByOn = True
End Sub