Cells.find help
 

I am trying to do this. Once I run this command:

Cells.Find(What:="Average Totals", After:=ActiveCell, LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

It will activate whatever cell it finds "Average Totals" in. Once this
happens I want the macro to take that row and make it active so I can insert
a row. How can I do it?

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200605/1

Cells.find help
 

Cells.Find(What:="Average Totals", After:=ActiveCell, LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).EntireRow.Activate

HTH
--
AP

"erikkeith via OfficeKB.com" <u13156@uwe a écrit dans le message de news:
5fca0f6998692@uwe...
I am trying to do this. Once I run this command:

Cells.Find(What:="Average Totals", After:=ActiveCell, LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

It will activate whatever cell it finds "Average Totals" in. Once this
happens I want the macro to take that row and make it active so I can
insert
a row. How can I do it?

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200605/1

Cells.find help
 

Hi,

does this help?

Cells.Find(What:="Average Totals", After:=ActiveCell,
LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows,
SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).entirerow.insert
shift:=xlshiftdown

Regards,
Ivan

Cells.find help
 

Perfect! Thanks

Ivan Raiminius wrote:
Hi,

does this help?

Cells.Find(What:="Average Totals", After:=ActiveCell,
LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows,
SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).entirerow.insert
shift:=xlshiftdown

Regards,
Ivan

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200605/1