I have a routine that searches a range at the top of the current worksheet for a column's title, which is then used to define the column to be sorted by another routine. Here's a snippet that works great:
sFind = "ColumnHeaderName" '(actually a passed variable from parent)...