If I have a sheet Formula =IF(A1 < "",ChangeSize())

and the ChangeSize() Sub in a VBA module is

Sub ChangeSize()
Msgbox(ActiveCell.value)
ActiveCell.Font.Size = 15
End Sub

It Puts up the Msgbox with the value of A1
But it doesnt change font size in the cell???


--
Willot
------------------------------------------------------------------------
Willot's Profile: http://www.excelforum.com/member.php...o&userid=35166
View this thread: http://www.excelforum.com/showthread...hreadid=549356

Functions used in a worksheet and only return a value to the cell in which
they are used. They can not alter the excel environment. There are a few
exceptions, but nothing along the lines of what you want to do.

So no, it shouldn't work.

--
Regards,
Tom Ogilvy

"Willot" wrote:


If I have a sheet Formula =IF(A1 < "",ChangeSize())

and the ChangeSize() Sub in a VBA module is

Sub ChangeSize()
Msgbox(ActiveCell.value)
ActiveCell.Font.Size = 15
End Sub

It Puts up the Msgbox with the value of A1
But it doesnt change font size in the cell???


--
Willot
------------------------------------------------------------------------
Willot's Profile: http://www.excelforum.com/member.php...o&userid=35166
View this thread: http://www.excelforum.com/showthread...hreadid=549356