ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   ChangeEvent (https://www.excelbanter.com/excel-programming/350818-changeevent.html)

Shawn

ChangeEvent
 

Here is what I want. If a person types "yes" in any of cells A1:A10 then I
want the adjacent cell to the right to change to the value "red".

For example, if they type yes in cell A3 then cell B3 would automatically
change to the value "red".


--
Thanks
Shawn

Jim Thomlinson[_5_]

ChangeEvent
 
It would probably be easiest to use a formula but here it is with Change code

Private Sub Worksheet_Change(ByVal Target As Range)

If Not (Intersect(Target, Range("A1:A10")) Is Nothing) Then
If UCase(Trim(Target.Value)) = "YES" Then Target.Offset(0, 1).Value
= "Red"
End If
End Sub
--
HTH...

Jim Thomlinson


"Shawn" wrote:


Here is what I want. If a person types "yes" in any of cells A1:A10 then I
want the adjacent cell to the right to change to the value "red".

For example, if they type yes in cell A3 then cell B3 would automatically
change to the value "red".


--
Thanks
Shawn



All times are GMT +1. The time now is 09:10 PM.

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