If Not Empty(m.tcTag) With This *** Make sure it really is a tag for the grid's RecordSource If IsTag(m.tcTag, .RecordSource) *** Go ahead and set the order for the table Select (.RecordSource) Set Order To (m.tcTag) .SetFocus() Endif Endwith EndifWhen I click on a "qualifying" column, whilst the order of the grid changes, the column that I have clicked on does not receive focus (where I mean that the new column becomes "selected"). In fact, the previous column retains focus. In the above code, I assume that the Setfocus method call is the the grid's setfocus.