ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Find (https://www.excelbanter.com/excel-programming/357865-find.html)

cbh35711[_6_]

Find
 

So, I'm trying to look at the current sheet and see if AWP is anywher
on the page.
I'm using the code below, but I’m getting false positives. I check i
by searching the sheet again with the normal find and nothing come
up.

Dim rngFound As Range
Dim this As String
this = ActiveSheet.Name
Set rngFound = Sheets(this).Columns("A:U").Find(What:=awp
LookAt:=xlWhole, LookIn:=xlValues)
If rngFound Is Nothing Then
MsgBox "d'oh!"
Else
With Sheets(this)
MsgBox "Yahoo"
End With
End If

Also, I’m trying to differentiate between two types of cells. On
which has either a < or and another type that just has a =. Woul
find be the way to go and possibly confine the search to just on
cell?

Thanks for any assistance you can offer,

Chri

--
cbh3571
-----------------------------------------------------------------------
cbh35711's Profile: http://www.excelforum.com/member.php...fo&userid=3027
View this thread: http://www.excelforum.com/showthread.php?threadid=52921


Jim Thomlinson

Find
 
I am guessing you do not have Option Explicit at the top of your code module.
Add that line and Select debug - compile. It should highlight the find
statement with a message to the effect that awp is not defined. I think what
you want is What:="AWP". You probably also what MatchCase:=False...

Check out this link on declaring variables...

http://www.cpearson.com/excel/DeclaringVariables.htm

As for the formulas with < or , yes you can use a find. Change xlValues to
xlFormulas and you will be off to the races...
--
HTH...

Jim Thomlinson


"cbh35711" wrote:


So, I'm trying to look at the current sheet and see if AWP is anywhere
on the page.
I'm using the code below, but Im getting false positives. I check it
by searching the sheet again with the normal find and nothing comes
up.

Dim rngFound As Range
Dim this As String
this = ActiveSheet.Name
Set rngFound = Sheets(this).Columns("A:U").Find(What:=awp,
LookAt:=xlWhole, LookIn:=xlValues)
If rngFound Is Nothing Then
MsgBox "d'oh!"
Else
With Sheets(this)
MsgBox "Yahoo"
End With
End If

Also, Im trying to differentiate between two types of cells. One
which has either a < or and another type that just has a =. Would
find be the way to go and possibly confine the search to just one
cell?

Thanks for any assistance you can offer,

Chris


--
cbh35711
------------------------------------------------------------------------
cbh35711's Profile: http://www.excelforum.com/member.php...o&userid=30276
View this thread: http://www.excelforum.com/showthread...hreadid=529219



Toppers

Find
 
need AWP in quotes otherwise EXcel treats AWP s variable.

What:="awp",

"cbh35711" wrote:


So, I'm trying to look at the current sheet and see if AWP is anywhere
on the page.
I'm using the code below, but Im getting false positives. I check it
by searching the sheet again with the normal find and nothing comes
up.

Dim rngFound As Range
Dim this As String
this = ActiveSheet.Name
Set rngFound = Sheets(this).Columns("A:U").Find(What:=awp,
LookAt:=xlWhole, LookIn:=xlValues)
If rngFound Is Nothing Then
MsgBox "d'oh!"
Else
With Sheets(this)
MsgBox "Yahoo"
End With
End If

Also, Im trying to differentiate between two types of cells. One
which has either a < or and another type that just has a =. Would
find be the way to go and possibly confine the search to just one
cell?

Thanks for any assistance you can offer,

Chris


--
cbh35711
------------------------------------------------------------------------
cbh35711's Profile: http://www.excelforum.com/member.php...o&userid=30276
View this thread: http://www.excelforum.com/showthread...hreadid=529219



cbh35711[_7_]

Find
 

Great thanks guys.
Works groovily now.

Chri

--
cbh3571
-----------------------------------------------------------------------
cbh35711's Profile: http://www.excelforum.com/member.php...fo&userid=3027
View this thread: http://www.excelforum.com/showthread.php?threadid=52921



All times are GMT +1. The time now is 01:54 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com