Returns the row height of the active cell.
For instructions on how to add a function to a workbook refer to the page under Inserting Functions

'iRowNo - (Optional) The row number you want the height of.

Public Function ROWHEIGHT(Optional ByVal iRowNo As Integer = -1) As Single

   If iRowNo = -1 Then
      ROWHEIGHT = ActiveCell.RowHeight
      ROWHEIGHT = ActiveSheet.Rows(iRowNo & ":" & iRowNo).RowHeight
   End If

End Function

© 2024 Better Solutions Limited. All Rights Reserved. © 2024 Better Solutions Limited TopPrevNext