On Wednesday, March 14, 2012 7:15:26 AM UTC-5, wrote:
i have a program that scrools across column headers that are in row
10. when it finds the header that = the variable thats already been
gained from a list box i want the code to stop moving across and
select the current column and the next five columns along and also the
below 15 rows. once selected i am trying to copy it somewhere else.

Just cannot seem to get the data selected

any help greatly recieved

John


Sub findtextinrow10andselectrangeSAS()
Set mf = Rows(10).Find(What:="yourtexthere", _
LookIn:=xlValues, LookAt:=xlWhole, _
SearchOrder:=xlByColumns, SearchDirection:=xlNext)

If Not mf Is Nothing Then mf.Resize(16, 6).copy range("h10")
End Sub