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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Add a new row in Named Table (Table1) and add data from txtboxes into last empty cells based on header named of the Table1 0
I want to make One Cell mandatory if another cell has a specific value , can anyone help me? 0
collapse an expand rows using VB 7
AutoFit Macro to Reduce row height? 0
Row Height -- Slows VBA 7
Change row height based on content of merged cell 2
Adjusting height of text cells 3
amend row height on all sheets 0

Back
Top