Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 88
Default Limit find range

Is there a way to limit the amount of cells excel will
search in to find a specific value. I have tried this,

Set celltofind = Cells.Range("A1:A50").Find(What:="No
Match", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, _
SearchDirection:=xlNext, MatchCase:=False)

But get an error :o(

If I do not include the .Range("A1:A50") to the above.
The spreadsheet will keep looking until it finds another
match and thus mess the way I track other stuff. I have a
spreadsheet that seperates canadian customers from US
customers and I would like to keep the finds seperate if
possible.

Thanks
Pete W
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 983
Default Limit find range

You can define the sheet to
search

Set wks = ActiveSheet (or whatever sheet you want)
and the range to search
Set rngToSearch = wks.Range("B2:B10") 'Or whatever range you want....


Public Sub InsertRows()
Dim wks As Worksheet
Dim rngToSearch As Range
Dim rngFound As Range
Dim rngFirst As Range

Set wks = ActiveSheet
Set rngToSearch = wks.Range("B2:B10")
Set rngFound = rngToSearch.Find("Line", , xlValues, xlPart)

If Not rngFound Is Nothing Then
Set rngFirst = rngFound
msgbox rngfound.address
Do
Set rngFound = rngToSearch.FindNext(rngFound)
msgbox rngfound.address
Loop Until rngFound.Address = rngFirst.Address
End If

End Sub

HTH


"Pete" wrote:

Is there a way to limit the amount of cells excel will
search in to find a specific value. I have tried this,

Set celltofind = Cells.Range("A1:A50").Find(What:="No
Match", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, _
SearchDirection:=xlNext, MatchCase:=False)

But get an error :o(

If I do not include the .Range("A1:A50") to the above.
The spreadsheet will keep looking until it finds another
match and thus mess the way I track other stuff. I have a
spreadsheet that seperates canadian customers from US
customers and I would like to keep the finds seperate if
possible.

Thanks
Pete W

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 595
Default Limit find range

Pete

What is the error? The only way you'll get an error on that is if the
ActiveCell isn't in A1:A50. The range you supply for the After argument
must be in the range for the Find. If you want to find all occurences, just
omit the After argument.

--
Dick Kusleika
Excel MVP
Daily Dose of Excel
www.dicks-blog.com

Pete wrote:
Is there a way to limit the amount of cells excel will
search in to find a specific value. I have tried this,

Set celltofind = Cells.Range("A1:A50").Find(What:="No
Match", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, _
SearchDirection:=xlNext, MatchCase:=False)

But get an error :o(

If I do not include the .Range("A1:A50") to the above.
The spreadsheet will keep looking until it finds another
match and thus mess the way I track other stuff. I have a
spreadsheet that seperates canadian customers from US
customers and I would like to keep the finds seperate if
possible.

Thanks
Pete W



Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Find & Replace - Limit search to a specific column falena23 Excel Worksheet Functions 3 July 28th 08 03:46 PM
range limit Atishoo Excel Discussion (Misc queries) 3 June 3rd 08 05:30 PM
Counting characters in text cell to find 255 limit Dunc Excel Discussion (Misc queries) 2 January 22nd 07 09:36 PM
Range limit of CF Murtaza Excel Discussion (Misc queries) 1 April 25th 06 09:35 AM
Trying to limit .Find to a specific range [email protected] Excel Programming 5 November 2nd 03 10:41 PM


All times are GMT +1. The time now is 10:07 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"