Get the name and size of the font used in cell, eg =getfont(A1)
Function GetFont(rCell As Range) As String
GetFont = rCell.Font.Name & " " & rCell.Font.Size
End Function
© Copyright
andrewsexceltips.net
All Rights Reserved.