![]() |
find
I am trying to write a simple "Find" Procedure that I will expand on once I
get it to work. I have: Range("A1:G16").find(What:="abc", LookIn:=x1Values, LookAt:=x1Whole, SearchOrder:=x1ByColumns).Activate When I run it I get a "scpript out of range error". What am I doing wrong? Thanks |
find
You have a spelling mistake:
write xlValues instead of x1Values etc.! Use an On Error statement, becouse Find generates an error in case of not found. Regards, Stefi €˛ranswert€¯ ezt Ć*rta: I am trying to write a simple "Find" Procedure that I will expand on once I get it to work. I have: Range("A1:G16").find(What:="abc", LookIn:=x1Values, LookAt:=x1Whole, SearchOrder:=x1ByColumns).Activate When I run it I get a "scpript out of range error". What am I doing wrong? Thanks |
find
You might try changing your 1 's to l 's . Not typing here. 1 is no the same
as l. Also, you need not activate or select to work with your find mycell=Range("A1:G16").find("abc", LookIn:=xLValues, LookAt:=xLWhole, _ SearchOrder:=xLByColumns).address -- Don Guillett Microsoft MVP Excel SalesAid Software "ranswert" wrote in message ... I am trying to write a simple "Find" Procedure that I will expand on once I get it to work. I have: Range("A1:G16").find(What:="abc", LookIn:=x1Values, LookAt:=x1Whole, SearchOrder:=x1ByColumns).Activate When I run it I get a "scpript out of range error". What am I doing wrong? Thanks |
find
Thanks alot
"Stefi" wrote: You have a spelling mistake: write xlValues instead of x1Values etc.! Use an On Error statement, becouse Find generates an error in case of not found. Regards, Stefi €˛ranswert€¯ ezt Ć*rta: I am trying to write a simple "Find" Procedure that I will expand on once I get it to work. I have: Range("A1:G16").find(What:="abc", LookIn:=x1Values, LookAt:=x1Whole, SearchOrder:=x1ByColumns).Activate When I run it I get a "scpript out of range error". What am I doing wrong? Thanks |
find
Hope this will help you
through Code make the selection of required range and 'tofind' is the text you want to find Set FoundText = Selection.Find(What:=tofind, After:=ActiveCell, LookIn _ :=xlvalues, LookAt:=xlwhole, SearchOrder:=xlByRows, SearchDirection:= _ xlNext, MatchCase:=False, SearchFormat:=False) If Not FoundText Is Nothing Then FoundText.Select FoundCellRow = ActiveCell.Row Else End If "Stefi" wrote: You have a spelling mistake: write xlValues instead of x1Values etc.! Use an On Error statement, becouse Find generates an error in case of not found. Regards, Stefi €˛ranswert€¯ ezt Ć*rta: I am trying to write a simple "Find" Procedure that I will expand on once I get it to work. I have: Range("A1:G16").find(What:="abc", LookIn:=x1Values, LookAt:=x1Whole, SearchOrder:=x1ByColumns).Activate When I run it I get a "scpript out of range error". What am I doing wrong? Thanks |
find
You are welcome! Thanks for the feedback!
Stefi €˛ranswert€¯ ezt Ć*rta: Thanks alot "Stefi" wrote: You have a spelling mistake: write xlValues instead of x1Values etc.! Use an On Error statement, becouse Find generates an error in case of not found. Regards, Stefi €˛ranswert€¯ ezt Ć*rta: I am trying to write a simple "Find" Procedure that I will expand on once I get it to work. I have: Range("A1:G16").find(What:="abc", LookIn:=x1Values, LookAt:=x1Whole, SearchOrder:=x1ByColumns).Activate When I run it I get a "scpript out of range error". What am I doing wrong? Thanks |
find
It's not actually the .find that causes the error. It's the .activate that's
doing the damage. Stefi wrote: You have a spelling mistake: write xlValues instead of x1Values etc.! Use an On Error statement, becouse Find generates an error in case of not found. Regards, Stefi €˛ranswert€¯ ezt Ć*rta: I am trying to write a simple "Find" Procedure that I will expand on once I get it to work. I have: Range("A1:G16").find(What:="abc", LookIn:=x1Values, LookAt:=x1Whole, SearchOrder:=x1ByColumns).Activate When I run it I get a "scpript out of range error". What am I doing wrong? Thanks -- Dave Peterson |
All times are GMT +1. The time now is 09:09 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com