Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I use a cell.find command to find a row col with a certain item. Now
I want to alter that so that its one row below after the find. Here is what I have so far: Dim FirstCell As Range Dim LastCell As Range Dim SortRange As Range Set FirstCell = ActiveSheet.Cells.Find(What:="Pills", After:=[A4], LookIn:=xlFormulas, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False) ' need to set FirstCell to be one row lower to sort the data Set LastCell = ActiveSheet.Range("E65536").End(xlUp) ' end of data lines will be in E column Set SortRange = ActiveSheet.Range(FirstCell, LastCell) ' ActiveSheet.SortRange.Sort ' use A column as key |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Question about RANGE (easy one, or at least it should be) | Excel Programming | |||
Question about RANGE (easy one, or at least it should be) | Excel Programming | |||
change colorIndex, help me write an easy macro | Excel Programming | |||
easy way to change a formula | Excel Discussion (Misc queries) | |||
Easy question - If ...then Change cell value | Excel Programming |