Display cell value in status bar?

What's triggering the change in the cell you want to monitor? Calculation?

If so you can use:

<font face=Calibri><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> Worksheet_Calculate()<br>    Application.StatusBar = "A1's Value is: " & Range("A1").Value<br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN><br></FONT>

It's up to you how you want to reset it.

HTH,

Smitty,

Thanks that works great. Yes I am monitoring a cell which is changed through calculations throughout the sheet. How could I incorporate maybe a delay and then the value goes away?

Maybe like Application.Wait (Now() + TimeValue("0:00:10"))

You could do that, but you'll have to wait for it to finish:

<font face=Calibri><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> Worksheet_Calculate()<br>    <SPAN style="color:#00007F">With</SPAN> Application<br>        .StatusBar = "A1's Value is: " & Range("A1").Value<br>        .Wait (Now() + TimeValue("0:00:05"))<br>        .StatusBar = <SPAN style="color:#00007F">False</SPAN><br>    <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">With</SPAN><br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>

Thanks Smitty that will work fine.

If you don't want to wait for it to finish, you can do it this way:

In the worksheet module:



and in a standard module:

That's great...Thanks HOTPEPPER