How to test cell contents in a macro?
 

I'm using MS Excel 2000, and I want to write a macro that tests cell
contents. Unfortunately, after a couple hours of looking at help files
(MS Visual Basic 6.0), I have found no method to do so.

My code concept is
If Cellcontents(activecell) = "dog" then
DoSomething
EndIf

This used to be so easy in Lotus 1-2-3...haha, way back in the
pre-Win95 era! Can someone point me on the right track?


--
JennyGard
------------------------------------------------------------------------
JennyGard's Profile: http://www.excelforum.com/member.php...o&userid=31803
View this thread: http://www.excelforum.com/showthread...hreadid=515272

How to test cell contents in a macro?
 

Hi Jenny,

Try:

If Range("A1").Value = "dog" Then
'Your code
Else
'Do something else
End If

Or, if case is unimportant:

If LCase(Range(2A1").Value) = "dog" Then


---
Regards,
Norman



"JennyGard" wrote
in message ...

I'm using MS Excel 2000, and I want to write a macro that tests cell
contents. Unfortunately, after a couple hours of looking at help files
(MS Visual Basic 6.0), I have found no method to do so.

My code concept is
If Cellcontents(activecell) = "dog" then
DoSomething
EndIf

This used to be so easy in Lotus 1-2-3...haha, way back in the
pre-Win95 era! Can someone point me on the right track?


--
JennyGard
------------------------------------------------------------------------
JennyGard's Profile:
http://www.excelforum.com/member.php...o&userid=31803
View this thread: http://www.excelforum.com/showthread...hreadid=515272

How to test cell contents in a macro?
 

If ActiveCell.Value = "dog" Then...

You can even omit the .Value as it is the default property of the
ActiveCell object: If ActiveCell = "dog" Then...


JennyGard wrote:
I'm using MS Excel 2000, and I want to write a macro that tests cell
contents. Unfortunately, after a couple hours of looking at help files
(MS Visual Basic 6.0), I have found no method to do so.

My code concept is
If Cellcontents(activecell) = "dog" then
DoSomething
EndIf

This used to be so easy in Lotus 1-2-3...haha, way back in the
pre-Win95 era! Can someone point me on the right track?


--
JennyGard
------------------------------------------------------------------------
JennyGard's Profile: http://www.excelforum.com/member.php...o&userid=31803
View this thread: http://www.excelforum.com/showthread...hreadid=515272

How to test cell contents in a macro?
 

Hi Jenny.

There is a typo:

If LCase(Range(2A1").Value) = "dog" Then

should read

If LCase(Range("A1").Value) = "dog" Then

(2 == ")

---
Regards,
Norman



"Norman Jones" wrote in message
...
Hi Jenny,

Try:

If Range("A1").Value = "dog" Then
'Your code
Else
'Do something else
End If

Or, if case is unimportant:

If LCase(Range(2A1").Value) = "dog" Then


---
Regards,
Norman

How to test cell contents in a macro?
 

Thanks, guys!
Both methods worked, and they were easy...just as I suspected...but I
just couldn't quite figure it out for myself. The MS VB help files
certainly do not seem geared for beginners. Is there a good online
introduction to Excel macro programming?


--
JennyGard
------------------------------------------------------------------------
JennyGard's Profile: http://www.excelforum.com/member.php...o&userid=31803
View this thread: http://www.excelforum.com/showthread...hreadid=515272