Hi everyone,
If you set a cell to ShrinkToFit and it shrinks the text, how would you test
what size font ShrinkToFit set it to? If you just test the font size it
returns the default value you already set it to and not the value ShrinkToFit
made it.
Thanks for any help.

Your shrink to fit should give you a percentage. So if your original font
size was 10 and your shrink to fit was 50% then your effective font size
should be 5. I would say that give or take some rounding you should just be
able to multiply your font size by your shrink to fit percentage.
--
HTH...

Jim Thomlinson


"visdev1" wrote:

Hi everyone,
If you set a cell to ShrinkToFit and it shrinks the text, how would you test
what size font ShrinkToFit set it to? If you just test the font size it
returns the default value you already set it to and not the value ShrinkToFit
made it.
Thanks for any help.

visdev1,
As far as I know there is no way to tell
Why do you need to know this ?

NickHK

"visdev1" wrote in message
...
Hi everyone,
If you set a cell to ShrinkToFit and it shrinks the text, how would you
test
what size font ShrinkToFit set it to? If you just test the font size it
returns the default value you already set it to and not the value
ShrinkToFit
made it.
Thanks for any help.

NickHK,
I am auto inserting text into a merged range. If the text gets below a
certain size that isnt readable im just going to delete the text. Resizing
the cell to fit the text is something i cant do because other cells need the
row and column to remain that size.
Thanks

"NickHK" wrote:

visdev1,
As far as I know there is no way to tell
Why do you need to know this ?

NickHK

"visdev1" wrote in message
...
Hi everyone,
If you set a cell to ShrinkToFit and it shrinks the text, how would you
test
what size font ShrinkToFit set it to? If you just test the font size it
returns the default value you already set it to and not the value
ShrinkToFit
made it.
Thanks for any help.

How do you get the percentage?

With Selection
x = .ShrinkToFit 'only returns True
end with

and

x = .Size 'only returns 10

Thanks
"Jim Thomlinson" wrote:

Your shrink to fit should give you a percentage. So if your original font
size was 10 and your shrink to fit was 50% then your effective font size
should be 5. I would say that give or take some rounding you should just be
able to multiply your font size by your shrink to fit percentage.
--
HTH...

Jim Thomlinson


"visdev1" wrote:

Hi everyone,
If you set a cell to ShrinkToFit and it shrinks the text, how would you test
what size font ShrinkToFit set it to? If you just test the font size it
returns the default value you already set it to and not the value ShrinkToFit
made it.
Thanks for any help.

visdev1,
Like I say, that is not a property that Excel exposes IIRC.
An alternative would be to limit the length of text that can be insert using
Data Validation.
You would have to determine a suitable number character that still remains
readable.

NickHK

"visdev1" wrote in message
...
NickHK,
I am auto inserting text into a merged range. If the text gets below a
certain size that isnt readable im just going to delete the text.
Resizing
the cell to fit the text is something i cant do because other cells need
the
row and column to remain that size.
Thanks

"NickHK" wrote:

visdev1,
As far as I know there is no way to tell
Why do you need to know this ?

NickHK

"visdev1" wrote in message
...
Hi everyone,
If you set a cell to ShrinkToFit and it shrinks the text, how would
you
test
what size font ShrinkToFit set it to? If you just test the font size
it
returns the default value you already set it to and not the value
ShrinkToFit
made it.
Thanks for any help.