Setting the row height based on a cell value

  • Thread starter Thread starter dcl
  • Start date Start date
D

dcl

I want to set the row height of all rows after after a certain row based on
the value of a cell within each row.

Can anyone give me the VB to do this?

Thanks
 
If you want to set row height based on the values in Column B,you can
use the below code to do the same.

Sub Macro1()
For i = 1 To 20
If Range("B" & i).Value <> "" Then
ActiveSheet.Rows(i & ":" & i).RowHeight = Range("B" & i).Value
End If
Next
End Sub

Cheers :)

-Ayush Jain
 
Back
Top