Revathi Kannan
New Member
- Joined
- Jan 27, 2012
- Messages
- 23

Hi all,
I have the following code which will filter the columns as per my requirement but after filtering the columns i need to name the active cells as "Ship" in the column "Remarks" based on the used range column A. Please assist.

<code style="margin: 0px; padding: 0px; font-style: inherit; font-weight: inherit; line-height: 12px;">Selection.AutoFilter
Cells.Find(What:="direction", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Selection.AutoFilter Field:=6, Criteria1:="E"
Cells.Find(What:="Instructions Rec (Act.)", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Selection.AutoFilter Field:=27, Criteria1:="<>"</code>