Cell value specific font size change
For a single cell:
Sub size_it()
Range("B1").Font.Size = Range("A1").Value
End Sub
You can setup a loop to cover the full columns.
--
Gary's Student
"Geoff C" wrote:
Would like to format font size in one column, according to a value in
another, e.g. if I have the data
A B
1 12 X
2 6 Y
3 16 X
4 9 Y
..
I would like the font size of the cells in column B to be the relevant
number in column A
(Going to use wingding arrows in B, but they won't display here)
Thanks,
Geoff.
|