LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 67
Default Nothing Happens

I thought I posted this but it appears not to be showing so sorry if
there are two next to each other. I am trying to do a user input that
if what I put in is in a cell that cells font will be blue. When I do
it nothing happens. I did the place my mouse of the cell and input to
see what it was seeing and it says they both see 100 but the macro
doesn't change the font still.
Do While Userinput < "done"
Userinput = InputBox("Type in goal.Type 'done' to stop.")
If Userinput = Range("G2") Then Range("G2").Font.Color = RGB(0, 0,
255)
Loop
End Sub

 
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



All times are GMT +1. The time now is 11:01 PM.

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"