Excel - increase / decrease font size based on value in cell having a formula

Asked By noname on 15-Oct-10 05:08 PM
Hi,

I have a worksheet containing cells having text in Column A & in
Column B i have cells having formulae in them. column. Using VBA, i am
trying to increase / decrease font size of Column A text, based on the
formula value returned in Column B cell.

for each rr in rng
if rr.offset(0,1).hasformula then
rr.font.size=rr.offset(0,1).value
end if
next rr

right now, i am unable to get the value returned by the formula using
VBA. How to achieve this?




Jim Cone replied to noname on 15-Oct-10 05:42 PM
Works for me.  I added:  Set rng = Selection.Cells
Also, those values in the next column should be numeric.  Better check.
--
Jim Cone
Portland, Oregon  USA
http://www.contextures.com/excel-sort-addin.html
(review of excel sorting add-in)

.
.
.

Hi,

I have a worksheet containing cells having text in Column A & in
Column B i have cells having formulae in them. column. Using VBA, i am
trying to increase / decrease font size of Column A text, based on the
formula value returned in Column B cell.

for each rr in rng
if rr.offset(0,1).hasformula then
rr.font.size=rr.offset(0,1).value
end if
next rr

right now, i am unable to get the value returned by the formula using
VBA. How to achieve this?
Ron Rosenfeld replied to noname on 15-Oct-10 08:09 PM
The snippet you post should work, depending on the rest of the code
and the contents of rr.offset(0,1).

So, what is the rest of the code?
What is the actual contents of rr.offset(0,1)?